Changeset 16339 for gsdl/trunk/perllib/dbutil.pm

Timestamp:

2008-07-10T14:13:51+12:00 (16 years ago)

Author:

davidb

Message:

Added quotes around exec of 'txt2db' so it will work from within a folder with spaces in its name

File:

• gsdl/trunk/perllib/dbutil.pm (modified) (1 diff)

gsdl/trunk/perllib/dbutil.pm

@@ -144 +144 @@
     my $txt2db_exe = &util::filename_cat("$ENV{'GSDLHOME'}/bin/$ENV{'GSDLOS'}", "txt2db" . &util::get_os_exe());
     my $infodb_file_handle = undef;
-    if (!-e "$txt2db_exe" || !open($infodb_file_handle, "| $txt2db_exe \"$infodb_file_path\""))
+    if (!-e "$txt2db_exe" || !open($infodb_file_handle, "| \"$txt2db_exe\" \"$infodb_file_path\""))
     {
     return undef;