Changeset 2359 for trunk/gsdl/perllib

Timestamp:

2001-05-04T11:15:58+12:00 (23 years ago)

Author:

sjboddie

Message:

Altered the help text a little for mkcol.pl, import.pl, buildcol.pl, and
build so that they now suggest using the "more" pager if the help text
scrolls off the screen (brought about by usability studies under DOS).
Note that this means some debug info that was once printed to STDERR is
now being printed to STDOUT.

Location:

trunk/gsdl/perllib

Files:

• parsargv.pm (modified) (4 diffs)
• util.pm (modified) (3 diffs)

trunk/gsdl/perllib/parsargv.pm

@@ -151 +151 @@
         elsif (!$allow_extra_options)
         {
-        print STDERR "$arg is not a valid option.\n";
+        print STDOUT "$arg is not a valid option.\n";
         $errors++;
         }
@@ -176 +176 @@
         elsif (ref($option{$arg}->{'varref'}) ne 'ARRAY')
         {
-        print STDERR "Missing command line argument -$arg.\n";
+        print STDOUT "Missing command line argument -$arg.\n";
         $errors++;
         }
@@ -196 +196 @@
     else
     {
-        print STDERR "Bad value for -$option->{'name'} argument.\n";
+        print STDOUT  "Bad value for -$option->{'name'} argument.\n";
         $$errors++;
     }
@@ -206 +206 @@
     else
     {
-    print STDERR "No value given for -$option->{'name'}.\n";
+    print STDOUT "No value given for -$option->{'name'}.\n";
     $$errors++;
     }

trunk/gsdl/perllib/util.pm

@@ -566 +566 @@
         $collection = $ENV{'GSDLCOLLECTION'};
     } else {
-        print STDERR "No collection specified\n";
+        print STDOUT "No collection specified\n";
         return "";
     }
@@ -572 +572 @@
     
     if ($collection eq "modelcol") {
-    print STDERR "You can't use modelcol.\n";
+    print STDOUT "You can't use modelcol.\n";
     return "";
     }
@@ -583 +583 @@
     # make sure this collection exists
     if (!-e $ENV{'GSDLCOLLECTDIR'}) {
-    print STDERR "Invalid collection ($collection).\n";
+    print STDOUT "Invalid collection ($collection).\n";
     return "";
     }