Changeset 1818 for trunk/gsdl
- Timestamp:
- 2000-12-20T12:43:45+13:00 (24 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/lib/gsdltools.cpp
r1817 r1818 130 130 argv[0] = "sh"; 131 131 argv[1] = "-c"; 132 argv[2] = cmd ;132 argv[2] = cmd_c; 133 133 argv[3] = 0; 134 134 execv("/bin/sh", argv); … … 144 144 bool perl_ok (ostream &logout) { 145 145 #if defined(__WIN32__) 146 text_t cmd = "perl -e \"exit 1\"";146 text_t cmd = "perl -e \"exit 0\""; 147 147 #else 148 text_t cmd = "perl -e \"'exit 1'\"";148 text_t cmd = "perl -e 'exit 0'"; 149 149 #endif; 150 150 int i = gsdl_system (cmd, true, logout); 151 return (i == 1);151 return (i == 0); 152 152 }
Note:
See TracChangeset
for help on using the changeset viewer.