Changeset 16339
- Timestamp:
- 2008-07-10 14:13:51 (4 months ago)
- Files:
-
- gsdl/trunk/perllib/dbutil.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
gsdl/trunk/perllib/dbutil.pm
r16240 r16339 144 144 my $txt2db_exe = &util::filename_cat("$ENV{'GSDLHOME'}/bin/$ENV{'GSDLOS'}", "txt2db" . &util::get_os_exe()); 145 145 my $infodb_file_handle = undef; 146 if (!-e "$txt2db_exe" || !open($infodb_file_handle, "| $txt2db_exe\"$infodb_file_path\""))146 if (!-e "$txt2db_exe" || !open($infodb_file_handle, "| \"$txt2db_exe\" \"$infodb_file_path\"")) 147 147 { 148 148 return undef;
