Changeset 14925 for gsdl/trunk/bin/script/filecopy.pl
- Timestamp:
- 2007-12-19T15:03:24+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/bin/script/filecopy.pl
r2495 r14925 48 48 print STDERR " -follow_links Follow symbolic links when recursing directory\n"; 49 49 print STDERR " structure\n"; 50 print STDERR " -collectdir directory Collection directory (defaults to " . 51 &util::filename_cat ($ENV{'GSDLHOME'}, "collect") . ")\n"; 50 print STDOUT " -collectdir directory Collection directory (defaults to " . 51 &util::filename_cat($ENV{'GSDLHOME'}). "collect for Greenstone2;\n"; 52 print STDOUT" for Greenstone3 use -site option and then collectdir default will be\n"; 53 print STDOUT " set to the collect folder within that site.)\n"; 54 print STDOUT " -site Specify the site within a Greenstone3 installation to use.\n"; 52 55 print STDERR " -out Filename or handle to print output status to.\n"; 53 56 print STDERR " The default is STDERR\n\n"; … … 116 119 'follow_links', \$follow_links, 117 120 'collectdir/.*/', \$collectdir, 121 'site/.*/', \$site, 118 122 'out/.*/STDERR', \$out)) { 119 123 &print_usage(); … … 121 125 } 122 126 123 if ($collectdir !~ /\w/) { 124 $collectdir = &util::filename_cat ($ENV{'GSDLHOME'}, "collect"); 127 128 if (defined $site) 129 { 130 die "GSDL3HOME not set." unless $ENV{'GSDL3HOME'}; 131 $collectdir = &util::filename_cat ($ENV{'GSDL3HOME'}, "sites", $site, "collect") unless $collectdir =~ /\w/; 132 } 133 else 134 { 135 $collectdir = &util::filename_cat ($ENV{'GSDLHOME'}, "collect") unless $collectdir =~ /\w/; 125 136 } 126 137
Note:
See TracChangeset
for help on using the changeset viewer.