Changeset 27521 for main/trunk/greenstone2/gsicontrol.bat

Timestamp:

2013-05-30T20:53:34+12:00 (11 years ago)

Author:

ak19

Message:

Resetting gsdlhome (reset-gsdlhome command) should not just update the perl shebang for gliserver.pl but also checksum.pl and metadata-server.pl

File:

• main/trunk/greenstone2/gsicontrol.bat (modified) (2 diffs)

main/trunk/greenstone2/gsicontrol.bat

@@ -207 +207 @@
 
 :relocate
-:: The path to the included perl at the top of gliserver.pl needs to use the new gsdlhome
-:: On windows, the path in gliserver.pl uses backslashes
+:: The path to the included perl at the top of gliserver.pl and other cgi-bin perl files needs to use the new gsdlhome
+:: On windows, the path in gliserver.pl and the others uses backslashes
 for /F "delims=*" %%T in ('"echo !gshome!| !_sed! s@\\@\\\\@g"') do set safeoldhome=%%T
 for /F "delims=*" %%T in ('"echo !gsdlhome!| !_sed! s@\\@\\\\@g"') do set safenewhome=%%T
@@ -215 +215 @@
   type "!cgibin!\gliserver.pl.bak" | !_sed! "s@!safeoldhome!@!safenewhome!@g" > "!cgibin!\gliserver.pl"
   del "!cgibin!\gliserver.pl.bak"
+
+  copy "!cgibin!\metadata-server.pl" "!cgibin!\metadata-server.pl.bak"
+  type "!cgibin!\metadata-server.pl.bak" | !_sed! "s@!safeoldhome!@!safenewhome!@g" > "!cgibin!\metadata-server.pl"
+  del "!cgibin!\metadata-server.pl.bak"
+
+  copy "!cgibin!\checksum.pl" "!cgibin!\checksum.pl.bak"
+  type "!cgibin!\checksum.pl.bak" | !_sed! "s@!safeoldhome!@!safenewhome!@g" > "!cgibin!\checksum.pl"
+  del "!cgibin!\checksum.pl.bak"
 )
 set safenewhome=