Changeset 7179
- Timestamp:
- 2004-04-05T14:03:53+12:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/exportcol.pl
r7101 r7179 119 119 } 120 120 121 # first we do a quick check to see if the export coll function has been 122 # installed 123 my $gssetupexe = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "gssetup.exe"); 124 if (!-e $gssetupexe) { 125 &gsprintf($out, "{exportcol.fail} {exportcol.export_coll_not_installed}\n"); 126 die "\n"; 127 } 128 121 129 # check each collection 122 130 my @valid_coll_list = (); … … 215 223 my $maincfg = &util::filename_cat ($ENV{'GSDLHOME'}, "etc", "main.cfg"); 216 224 my $serverexe = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "server.exe"); 217 my $gssetupexe = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "gssetup.exe");225 #my $gssetupexe = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "gssetup.exe"); - have checked this earlier 218 226 my $setupexe = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "Setup.exe"); 219 227 my $net32dir = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "net32");
Note:
See TracChangeset
for help on using the changeset viewer.