Implement --help

diff --git a/src/InfoCon/stempel/stempel b/src/InfoCon/stempel/stempel
index 31acc97..48bb3a1 100755 (executable)
--- a/src/InfoCon/stempel/stempel
+++ b/src/InfoCon/stempel/stempel
@@ -2,7 +2,7 @@
 
 #  Time Tracker
 #
-#  Copyright (c) 2007  Martin Schulze <joey@infodrom.org>
+#  Copyright (c) 2007,8  Martin Schulze <joey@infodrom.org>
 #
 #  This program is free software; you can redistribute it and/or modify
 #  it under the terms of the GNU General Public License as published by
@@ -199,9 +199,20 @@ sub toggle_task
     }
 }
 
+sub help
+{
+    print <<"END";
+stempel  Copyright (c) 2007,8  Martin Schulze <joey@infodrom.org>
+    --list         list all
+    --open         list open
+    --help         this text
+    -d             terminate task
+    exit
+}
 
 my %options = ('list' => \&list_all,
               'open' => \&list_open,
+              'help' => \&help,
               'terminate|end|d' => \&close_task,
               );
 GetOptions %options;