Changeset 1818 for trunk/gsdl/lib

Timestamp:

2000-12-20T12:43:45+13:00 (23 years ago)

Author:

sjboddie

Message:

Tidied up a couple of things arrising from the recent changes to the
gsdl_system() function.

File:

• trunk/gsdl/lib/gsdltools.cpp (modified) (2 diffs)

trunk/gsdl/lib/gsdltools.cpp

@@ -130 +130 @@
       argv[0] = "sh";
       argv[1] = "-c";
-      argv[2] = cmd;
+      argv[2] = cmd_c;
       argv[3] = 0;
       execv("/bin/sh", argv);
@@ -144 +144 @@
 bool perl_ok (ostream &logout) {
 #if defined(__WIN32__)
-  text_t cmd = "perl -e \"exit 1\"";
+  text_t cmd = "perl -e \"exit 0\"";
 #else 
-  text_t cmd = "perl -e \"'exit 1'\"";
+  text_t cmd = "perl -e 'exit 0'";
 #endif;
   int i = gsdl_system (cmd, true, logout);
-  return (i == 1);
+  return (i == 0);
 }