Changeset 2359


Ignore:
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
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/bin/script/build

    r1970 r2359  
    135135
    136136sub print_usage {
    137     print STDERR "\n";
    138     print STDERR "build: Builds a Greenstone collection (i.e. runs import.pl and buildcol.pl\n";
    139     print STDERR "       then copies the resulting indexes to the correct place).\n\n";
    140     print STDERR "  usage: $0 [options] collection-name\n\n";
    141     print STDERR "  options:\n";
    142     print STDERR "   -optionfile file        Get options from file, useful on systems where\n";
    143     print STDERR "                           long command lines may cause problems\n";
    144     print STDERR "   -append                 Add new files to existing collection\n";
    145     print STDERR "   -remove_archives        Remove archives directory after successfully\n";
    146     print STDERR "                           building the collection.\n";
    147     print STDERR "   -remove_import          Remove import directory after successfully\n";
    148     print STDERR "                           importing the collection.\n";
    149     print STDERR "   -buildtype build|import If 'build' attempt to build directly\n";
    150     print STDERR "                           from archives directory (bypassing import\n";
    151     print STDERR "                           stage). Defaults to 'import'\n";
    152     print STDERR "   -maxdocs number         Maximum number of documents to build\n";
    153     print STDERR "   -download directory     Directory (or file) to get import documents from.\n";
    154     print STDERR "                           There may be multiple download directories and they\n";
    155     print STDERR "                           may be of type http://, ftp://, or file://\n";
    156     print STDERR "                           Note that any existing import directory will be\n";
    157     print STDERR "                           deleted to make way for the downloaded data if\n";
    158     print STDERR "                           a -download option is supplied\n";
    159     print STDERR "   -collectdir directory   Collection directory (defaults to " .
     137    print STDOUT "\n";
     138    print STDOUT "build: Builds a Greenstone collection (i.e. runs import.pl and buildcol.pl\n";
     139    print STDOUT "       then copies the resulting indexes to the correct place).\n\n";
     140    print STDOUT "  usage: $0 [options] collection-name\n\n";
     141    print STDOUT "  options:\n";
     142    print STDOUT "   -optionfile file        Get options from file, useful on systems where\n";
     143    print STDOUT "                           long command lines may cause problems\n";
     144    print STDOUT "   -append                 Add new files to existing collection\n";
     145    print STDOUT "   -remove_archives        Remove archives directory after successfully\n";
     146    print STDOUT "                           building the collection.\n";
     147    print STDOUT "   -remove_import          Remove import directory after successfully\n";
     148    print STDOUT "                           importing the collection.\n";
     149    print STDOUT "   -buildtype build|import If 'build' attempt to build directly\n";
     150    print STDOUT "                           from archives directory (bypassing import\n";
     151    print STDOUT "                           stage). Defaults to 'import'\n";
     152    print STDOUT "   -maxdocs number         Maximum number of documents to build\n";
     153    print STDOUT "   -download directory     Directory (or file) to get import documents from.\n";
     154    print STDOUT "                           There may be multiple download directories and they\n";
     155    print STDOUT "                           may be of type http://, ftp://, or file://\n";
     156    print STDOUT "                           Note that any existing import directory will be\n";
     157    print STDOUT "                           deleted to make way for the downloaded data if\n";
     158    print STDOUT "                           a -download option is supplied\n";
     159    print STDOUT "   -collectdir directory   Collection directory (defaults to " .
    160160    &util::filename_cat ($ENV{'GSDLHOME'}, "collect") . ")\n";
    161     print STDERR "   -dontinstall            Only applicable if -collectdir is set to something\n";
    162     print STDERR "                           other than the default. -dontinstall will suppress the\n";
    163     print STDERR "                           default behaviour which is to install the collection to\n";
    164     print STDERR "                           the gsdl/collect directory once it has been built.\n";
    165     print STDERR "   -save_archives          Create a copy of the existing archives directory called\n";
    166     print STDERR "                           archives.org\n";
    167     print STDERR "   -out                    Filename or handle to print output status to.\n";
    168     print STDERR "                           The default is STDERR\n";
    169     print STDERR "   -log_events             Log important events (collection built successfully etc.)\n";
    170     print STDERR "                           to event_log_file\n";
    171     print STDERR "   -event_log_file file    File to append important events to (defaults to\n";
    172     print STDERR "                           " . &util::filename_cat ($ENV{'GSDLHOME'}, "etc", "events.txt") . "\n";
    173     print STDERR "   -email_events addr      Comma separated list of email addresses to mail details\n";
    174     print STDERR "                           of important collection building events\n";
    175     print STDERR "   -mail_server server     The outgoing (SMTP) mail server to be used by email_events.\n";
    176     print STDERR "                           email_events will be disabled if mail_server isn't set\n";
    177     print STDERR "   -event_header file      File containing a header to go on any event messages. If not\n";
    178     print STDERR "                           specified build will create a generic header\n\n";
     161    print STDOUT "   -dontinstall            Only applicable if -collectdir is set to something\n";
     162    print STDOUT "                           other than the default. -dontinstall will suppress\n";
     163    print STDOUT "                           the default behaviour which is to install the\n";
     164    print STDOUT "                           collection to the gsdl/collect directory once it has\n";
     165    print STDOUT "                           been built.\n";
     166    print STDOUT "   -save_archives          Create a copy of the existing archives directory\n";
     167    print STDOUT "                           called archives.org\n";
     168    print STDOUT "   -out                    Filename or handle to print output status to.\n";
     169    print STDOUT "                           The default is STDERR\n";
     170    print STDOUT "   -log_events             Log important events (collection built successfully\n";
     171    print STDOUT "                           etc.) to event_log_file\n";
     172    print STDOUT "   -event_log_file file    File to append important events to (defaults to\n";
     173    print STDOUT "                           " . &util::filename_cat ($ENV{'GSDLHOME'}, "etc", "events.txt") . "\n";
     174    print STDOUT "   -email_events addr      Comma separated list of email addresses to mail\n";
     175    print STDOUT "                           details of important collection building events\n";
     176    print STDOUT "   -mail_server server     The outgoing (SMTP) mail server to be used by\n";
     177    print STDOUT "                           email_events. email_events will be disabled if\n";
     178    print STDOUT "                           mail_server isn't set\n";
     179    print STDOUT "   -event_header file      File containing a header to go on any event\n";
     180    print STDOUT "                           messages. If not specified build will create a\n";
     181    print STDOUT "                           generic header\n\n";
     182    print STDOUT "  [Type \"perl -S buildcol.pl | more\" if this help text scrolled off your screen]";
     183    print STDOUT "\n" unless $ENV{'GSDLOS'} =~ /^windows$/i;
    179184}
    180185

  • trunk/gsdl/bin/script/buildcol.pl

    r2355 r2359  
    4444
    4545sub print_usage {
    46     print STDERR "\n";
    47     print STDERR "buildcol.pl: Builds the indexes of a Greenstone collection.\n\n";
    48     print STDERR "  usage: $0 [options] collection-name\n\n";
    49     print STDERR "  options:\n";
    50     print STDERR "   -verbosity number     0=none, 3=lots\n";
    51     print STDERR "   -archivedir directory Where the archives live\n";
    52     print STDERR "   -builddir directory   Where to put the built indexes\n";
    53     print STDERR "   -maxdocs number       Maximum number of documents to build\n";
    54     print STDERR "   -debug                Print output to STDOUT\n";
    55     print STDERR "   -mode all|compress_text|build_index|infodb\n";
    56     print STDERR "   -index indexname      Index to build (will build all in\n";
    57     print STDERR "                         config file if not set)\n";
    58     print STDERR "   -keepold              will not destroy the current contents of the\n";
    59     print STDERR "                         building directory\n";
    60     print STDERR "   -no_text              Don't store compressed text. This option is\n";
    61     print STDERR "                         useful for minimizing the size of the built\n";
    62     print STDERR "                         indexes if you intend always to display the\n";
    63     print STDERR "                         original documents at run time (i.e. you won't\n";
    64     print STDERR "                         be able to retrieve the compressed text version)\n";
    65     print STDERR "   -allclassifications   Don't remove empty classifications\n";
    66     print STDERR "   -create_images        Attempt to create default images for new\n";
    67     print STDERR "                         collection. This relies on the Gimp being\n";
    68     print STDERR "                         installed along with relevant perl modules\n";
    69     print STDERR "                         to allow scripting from perl\n";
    70     print STDERR "   -collectdir directory Collection directory (defaults to " .
     46    print STDOUT "\n";
     47    print STDOUT "buildcol.pl: Builds the indexes of a Greenstone collection.\n\n";
     48    print STDOUT "  usage: $0 [options] collection-name\n\n";
     49    print STDOUT "  options:\n";
     50    print STDOUT "   -verbosity number     0=none, 3=lots\n";
     51    print STDOUT "   -archivedir directory Where the archives live\n";
     52    print STDOUT "   -builddir directory   Where to put the built indexes\n";
     53    print STDOUT "   -maxdocs number       Maximum number of documents to build\n";
     54    print STDOUT "   -debug                Print output to STDOUT\n";
     55    print STDOUT "   -mode all|compress_text|build_index|infodb\n";
     56    print STDOUT "   -index indexname      Index to build (will build all in\n";
     57    print STDOUT "                         config file if not set)\n";
     58    print STDOUT "   -keepold              will not destroy the current contents of the\n";
     59    print STDOUT "                         building directory\n";
     60    print STDOUT "   -no_text              Don't store compressed text. This option is\n";
     61    print STDOUT "                         useful for minimizing the size of the built\n";
     62    print STDOUT "                         indexes if you intend always to display the\n";
     63    print STDOUT "                         original documents at run time (i.e. you won't\n";
     64    print STDOUT "                         be able to retrieve the compressed text version)\n";
     65    print STDOUT "   -allclassifications   Don't remove empty classifications\n";
     66    print STDOUT "   -create_images        Attempt to create default images for new\n";
     67    print STDOUT "                         collection. This relies on the Gimp being\n";
     68    print STDOUT "                         installed along with relevant perl modules\n";
     69    print STDOUT "                         to allow scripting from perl\n";
     70    print STDOUT "   -collectdir directory Collection directory (defaults to " .
    7171    &util::filename_cat ($ENV{'GSDLHOME'}, "collect") . ")\n";
    72     print STDERR "   -out                  Filename or handle to print output status to.\n";
    73     print STDERR "                         The default is STDERR\n";
    74     print STDERR "   -buildtype mg|mgpp    This will override the config file setting.\n";
    75     print STDERR "                         (default is mg)\n";
    76     print STDERR "   -no_strip_html        Do not strip the html tags from the indexed text\n";
    77     print STDERR "                         (only used for mgpp collections).\n\n";
     72    print STDOUT "   -out                  Filename or handle to print output status to.\n";
     73    print STDOUT "                         The default is STDERR\n";
     74    print STDOUT "   -buildtype mg|mgpp    This will override the config file setting.\n";
     75    print STDOUT "                         (default is mg)\n";
     76    print STDOUT "   -no_strip_html        Do not strip the html tags from the indexed text\n";
     77    print STDOUT "                         (only used for mgpp collections).\n\n";
     78    print STDOUT "  [Type \"perl -S buildcol.pl | more\" if this help text scrolled off your screen]";
     79    print STDOUT "\n" unless $ENV{'GSDLOS'} =~ /^windows$/i;
    7880}
    7981

  • trunk/gsdl/bin/script/import.pl

    r2355 r2359  
    4848
    4949sub print_usage {
    50     print STDERR "\n";
    51     print STDERR "import.pl: Converts documents in collections -importdir directory into\n";
    52     print STDERR "           gml documents which are written to the -archivedir directory.\n\n";
    53     print STDERR "  usage: $0 [options] collection-name\n\n";
    54     print STDERR "  options:\n";
    55     print STDERR "   -verbosity number      0=none, 3=lots\n";
    56     print STDERR "   -importdir directory   Where the original material lives\n";
    57     print STDERR "   -archivedir directory  Where the converted material ends up\n";
    58     print STDERR "   -keepold               Will not destroy the current contents of the\n";
    59     print STDERR "                          archives directory (the default)\n";
    60     print STDERR "   -removeold             Will remove the old contents of the archives\n";
    61     print STDERR "                          directory -- use with care\n";
    62     print STDERR "   -gzip                  Use gzip to compress resulting gml documents\n";
    63     print STDERR "                          (don't forget to include ZIPPlug in your plugin\n";
    64     print STDERR "                          list when building from compressed documents)\n";
    65     print STDERR "   -maxdocs number        Maximum number of documents to import\n";
    66     print STDERR "   -groupsize number      Number of GML documents to group into one file\n";
    67     print STDERR "   -OIDtype hash|incremental The method to use when generating unique\n";
    68     print STDERR "                          identifiers for each document. \"hash\" (the\n";
    69     print STDERR "                          default) hashes the contents of the file and so\n";
    70     print STDERR "                          will be the same every time the collection is\n";
    71     print STDERR "                          imported. \"incremental\" is a simple document\n";
    72     print STDERR "                          count and so will be significantly faster than\n";
    73     print STDERR "                          \"hash\". It is not guaranteed to always assign\n";
    74     print STDERR "                          the same identifier to a given document though\n";
    75     print STDERR "                          and does not allow further documents to be added\n";
    76     print STDERR "                          to existing gml archives\n";
    77     print STDERR "   -sortmeta metadata     Sort documents alphabetically by metadata for\n";
    78     print STDERR "                          building. This will be disabled if groupsize > 1\n";
    79     print STDERR "   -debug                 Print imported text to STDOUT\n";
    80     print STDERR "   -collectdir directory  Collection directory (defaults to " .
     50    print STDOUT "\n";
     51    print STDOUT "import.pl: Converts documents in collections -importdir directory into\n";
     52    print STDOUT "           gml documents which are written to the -archivedir directory.\n\n";
     53    print STDOUT "  usage: $0 [options] collection-name\n\n";
     54    print STDOUT "  options:\n";
     55    print STDOUT "   -verbosity number      0=none, 3=lots\n";
     56    print STDOUT "   -importdir directory   Where the original material lives\n";
     57    print STDOUT "   -archivedir directory  Where the converted material ends up\n";
     58    print STDOUT "   -keepold               Will not destroy the current contents of the\n";
     59    print STDOUT "                          archives directory (the default)\n";
     60    print STDOUT "   -removeold             Will remove the old contents of the archives\n";
     61    print STDOUT "                          directory -- use with care\n";
     62    print STDOUT "   -gzip                  Use gzip to compress resulting gml documents\n";
     63    print STDOUT "                          (don't forget to include ZIPPlug in your plugin\n";
     64    print STDOUT "                          list when building from compressed documents)\n";
     65    print STDOUT "   -maxdocs number        Maximum number of documents to import\n";
     66    print STDOUT "   -groupsize number      Number of GML documents to group into one file\n";
     67    print STDOUT "   -OIDtype hash|incremental The method to use when generating unique\n";
     68    print STDOUT "                          identifiers for each document. \"hash\" (the\n";
     69    print STDOUT "                          default) hashes the contents of the file and so\n";
     70    print STDOUT "                          will be the same every time the collection is\n";
     71    print STDOUT "                          imported. \"incremental\" is a simple document\n";
     72    print STDOUT "                          count and so will be significantly faster than\n";
     73    print STDOUT "                          \"hash\". It is not guaranteed to always assign\n";
     74    print STDOUT "                          the same identifier to a given document though\n";
     75    print STDOUT "                          and does not allow further documents to be added\n";
     76    print STDOUT "                          to existing gml archives\n";
     77    print STDOUT "   -sortmeta metadata     Sort documents alphabetically by metadata for\n";
     78    print STDOUT "                          building. This will be disabled if groupsize > 1\n";
     79    print STDOUT "   -debug                 Print imported text to STDOUT\n";
     80    print STDOUT "   -collectdir directory  Collection directory (defaults to " .
    8181    &util::filename_cat ($ENV{'GSDLHOME'}, "collect") . ")\n";
    82     print STDERR "   -out                   Filename or handle to print output status to.\n";
    83     print STDERR "                          The default is STDERR\n\n";
     82    print STDOUT "   -out                   Filename or handle to print output status to.\n";
     83    print STDOUT "                          The default is STDERR\n\n";
     84    print STDOUT "  [Type \"perl -S import.pl | more\" if this help text scrolled off your screen]";
     85    print STDOUT "\n" unless $ENV{'GSDLOS'} =~ /^windows$/i;
    8486}
    8587

  • trunk/gsdl/bin/script/mkcol.pl

    r1993 r2359  
    3535BEGIN {
    3636    die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};
     37    die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};
    3738    unshift (@INC, "$ENV{'GSDLHOME'}/perllib");
    3839}
    … …  
    4344
    4445sub print_usage {
    45     print STDERR "\n";
    46     print STDERR "mkcol.pl: Creates the directory structure for a new\n";
    47     print STDERR "          Greenstone collection.\n\n";
    48     print STDERR "  usage: $0 [options] collection-name\n\n";
    49     print STDERR "  options:\n";
    50     print STDERR "   -optionfile file    Get options from file, useful on systems where\n";
    51     print STDERR "                       long command lines may cause problems\n";
    52     print STDERR "   -collectdir         Directory where new collection will be created.\n";
    53     print STDERR "                       Default is " .
     46    print STDOUT "\n";
     47    print STDOUT "mkcol.pl: Creates the directory structure for a new\n";
     48    print STDOUT "          Greenstone collection.\n\n";
     49    print STDOUT "  usage: $0 -creator [options] email collection-name\n\n";
     50    print STDOUT "  options:\n";
     51    print STDOUT "   -optionfile file    Get options from file, useful on systems where\n";
     52    print STDOUT "                       long command lines may cause problems\n";
     53    print STDOUT "   -collectdir         Directory where new collection will be created.\n";
     54    print STDOUT "                       Default is " .
    5455    &util::filename_cat($ENV{'GSDLHOME'}, "collect") . "\n";
    55     print STDERR "   -creator email      Your email address\n";
    56     print STDERR "   -maintainer email   The collection maintainer's email address (if\n";
    57     print STDERR "                       different from the creator)\n";
    58     print STDERR "   -public true|false  If this collection has anonymous access\n";
    59     print STDERR "   -beta true|false    If this collection is still under development\n";
    60     print STDERR "   -title text         The title for the collection\n";
    61     print STDERR "   -about text         The about text for the collection\n";
    62     print STDERR "   -plugin text        perl plugin module to use (there may be multiple\n";
    63     print STDERR "                       plugin entries)\n";
    64     print STDERR "  Note that -creator is the only option to mkcol.pl that is mandatory.\n";
    65     print STDERR "  You can make changes to all options later by editing the collect.cfg\n";
    66     print STDERR "  configuration file for your new collection (it'll be in the \"etc\"\n";
    67     print STDERR "  directory).\n\n";
     56    print STDOUT "   -maintainer email   The collection maintainer's email address (if\n";
     57    print STDOUT "                       different from the creator)\n";
     58    print STDOUT "   -public true|false  If this collection has anonymous access\n";
     59    print STDOUT "   -beta true|false    If this collection is still under development\n";
     60    print STDOUT "   -title text         The title for the collection\n";
     61    print STDOUT "   -about text         The about text for the collection\n";
     62    print STDOUT "   -plugin text        perl plugin module to use (there may be multiple\n";
     63    print STDOUT "                       plugin entries)\n";
     64    print STDOUT "  Note that -creator must be specified. You can make changes to all\n";
     65    print STDOUT "  options later by editing the collect.cfg configuration file for your\n";
     66    print STDOUT "  new collection (it'll be in the \"etc\" directory).\n\n";
     67    print STDOUT "  [Type \"perl -S mkcol.pl | more\" if this help text scrolled off your screen]";
     68    print STDOUT "\n" unless $ENV{'GSDLOS'} =~ /^windows$/i;
    6869}
    6970
    … …  
    102103        $destfile = &util::filename_cat ($coldir, $destfile);
    103104
    104         print STDERR "doing replacements for $thisfile\n";
     105        print STDOUT "doing replacements for $thisfile\n";
    105106        open (INFILE, $thisfile) ||
    106107        die "Can't read file $thisfile";
    … …  
    170171    ($collection) = @ARGV;
    171172    if (!defined($collection)) {
    172     print STDERR "no collection name was specified\n";
     173    print STDOUT "no collection name was specified\n";
    173174    &print_usage();
    174175    die "\n";
    … …  
    176177
    177178    if (length($collection) > 8) {
    178     print STDERR "The collection name must be less than 8 characters\n";
    179     print STDERR "so compatibility with earlier filesystems can be\n";
    180     print STDERR "maintained.\n";
     179    print STDOUT "The collection name must be less than 8 characters\n";
     180    print STDOUT "so compatibility with earlier filesystems can be\n";
     181    print STDOUT "maintained.\n";
    181182    die "\n";
    182183    }
    183184
    184185    if ($collection eq "modelcol") {
    185     print STDERR "No collection can be named modelcol as this is the\n";
    186     print STDERR "name of the model collection.\n";
     186    print STDOUT "No collection can be named modelcol as this is the\n";
     187    print STDOUT "name of the model collection.\n";
    187188    die "\n";
    188189    }
    189190
    190191    if ($collection eq "CVS") {
    191     print STDERR "No collection can be named CVS as this may interfere\n";
    192     print STDERR "with directories created by the CVS versioning system\n";
     192    print STDOUT "No collection can be named CVS as this may interfere\n";
     193    print STDOUT "with directories created by the CVS versioning system\n";
    193194    die "\n";
    194195    }
    195196
    196197    if (!defined($creator) || $creator eq "") {
    197     print STDERR "The creator was not defined. This variable is\n";
    198     print STDERR "needed to recognise duplicate collection names.\n";
     198    print STDOUT "The creator was not defined. This variable is\n";
     199    print STDOUT "needed to recognise duplicate collection names.\n";
    199200    die "\n";
    200201    }
    … …  
    224225    if (defined $collectdir && $collectdir =~ /\w/) {
    225226    if (!-d $collectdir) {
    226         print STDERR "ERROR: $collectdir doesn't exist\n";
     227        print STDOUT "ERROR: $collectdir doesn't exist\n";
    227228        die "\n";
    228229    }
    … …  
    237238    # make sure this collection does not already exist
    238239    if (-e $cdir) {
    239     print STDERR "This collection already exists\n";
     240    print STDOUT "This collection already exists\n";
    240241    die "\n";
    241242    }
    242243
    243244    # start creating the collection
    244     print STDERR "Creating the collection $collection\n";
     245    print STDOUT "Creating the collection $collection\n";
    245246    &traverse_dir ($mdir, $cdir);
    246     print STDERR "The new collection is in $cdir.\n";
     247    print STDOUT "The new collection is in $cdir.\n";
    247248}
    248249

  • trunk/gsdl/perllib/parsargv.pm

    r1954 r2359  
    151151        elsif (!$allow_extra_options)
    152152        {
    153         print STDERR "$arg is not a valid option.\n";
     153        print STDOUT "$arg is not a valid option.\n";
    154154        $errors++;
    155155        }
    … …  
    176176        elsif (ref($option{$arg}->{'varref'}) ne 'ARRAY')
    177177        {
    178         print STDERR "Missing command line argument -$arg.\n";
     178        print STDOUT "Missing command line argument -$arg.\n";
    179179        $errors++;
    180180        }
    … …  
    196196    else
    197197    {
    198         print STDERR "Bad value for -$option->{'name'} argument.\n";
     198        print STDOUT "Bad value for -$option->{'name'} argument.\n";
    199199        $$errors++;
    200200    }
    … …  
    206206    else
    207207    {
    208     print STDERR "No value given for -$option->{'name'}.\n";
     208    print STDOUT "No value given for -$option->{'name'}.\n";
    209209    $$errors++;
    210210    }

  • trunk/gsdl/perllib/util.pm

    r2193 r2359  
    566566        $collection = $ENV{'GSDLCOLLECTION'};
    567567    } else {
    568         print STDERR "No collection specified\n";
     568        print STDOUT "No collection specified\n";
    569569        return "";
    570570    }
    … …  
    572572   
    573573    if ($collection eq "modelcol") {
    574     print STDERR "You can't use modelcol.\n";
     574    print STDOUT "You can't use modelcol.\n";
    575575    return "";
    576576    }
    … …  
    583583    # make sure this collection exists
    584584    if (!-e $ENV{'GSDLCOLLECTDIR'}) {
    585     print STDERR "Invalid collection ($collection).\n";
     585    print STDOUT "Invalid collection ($collection).\n";
    586586    return "";
    587587    }
Note: See TracChangeset for help on using the changeset viewer.