Changeset 28375 for main/trunk/greenstone2/perllib/mgbuilder.pm

Timestamp:

2013-10-10T13:57:59+13:00 (11 years ago)

Author:

davidb

Message:

A set of changes to help Greenstone building code (perl) run under Cygwin. The test is designed to be mutually to when run natively on Windows. In effect the refined test is saying: if you're windows but not cygwin then do as you used to do for Windows, otherwise go with Unix (as Cygwin is effectively giving you a Unix like operating system to run in)

File:

• main/trunk/greenstone2/perllib/mgbuilder.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/mgbuilder.pm

@@ -139 +139 @@
 
     my $osextra = "";
-    if ($ENV{'GSDLOS'} =~ /^windows$/i) {
+    if (($ENV{'GSDLOS'} =~ /^windows$/i) && ($^O ne "cygwin")) {
     $fulltextprefix =~ s@/@\\@g;
     } else {
@@ -354 +354 @@
 
     my $osextra = "";
-    if ($ENV{'GSDLOS'} =~ /^windows$/i) {
+    if (($ENV{'GSDLOS'} =~ /^windows$/i) && ($^O ne "cygwin")) {
     $fullindexprefix =~ s@/@\\@g;
     } else {