Improved synopsis, added 'man' command for manual.

1 files changed, 9 insertions, 1 deletions

diff --git a/lib/WWW/Pocket/Script.pm b/lib/WWW/Pocket/Script.pm
index 068ec3d..005d126 100644
--- a/lib/WWW/Pocket/Script.pm
+++ b/lib/WWW/Pocket/Script.pm
@@ -74,12 +74,20 @@ sub _method_is_command {
     return 1;
 }
 
-# Display help about this script.
+# Display quick usage help on this script.
 sub help {
     my $self = shift;
     pod2usage(-verbose => 1);
 }
 
+# Display comprehensive help about this script.
+sub man {
+    my $self = shift;
+    pod2usage(-verbose => 2);
+}
+
+
+
 sub authenticate {
     my $self = shift;
     $self->pocket;