comparison src/process.c @ 44:8d2a9b52c682 r19-15prefinal

Import from CVS: tag r19-15prefinal
author cvs
date Mon, 13 Aug 2007 08:55:10 +0200
parents c53a95d3c46d
children 56c54cf7c5b6
comparison
equal deleted inserted replaced
43:23cafc5d2038 44:8d2a9b52c682
1189 tem = Fexpand_file_name (tem, Qnil); 1189 tem = Fexpand_file_name (tem, Qnil);
1190 new_argv[0] = (char *) XSTRING_DATA (tem); 1190 new_argv[0] = (char *) XSTRING_DATA (tem);
1191 } 1191 }
1192 else 1192 else
1193 { 1193 {
1194 /* #### dmoore - file-directory-p can call lisp, make sure everything
1195 here protects itself. */
1194 if (!NILP (Ffile_directory_p (program))) 1196 if (!NILP (Ffile_directory_p (program)))
1195 error ("Specified program for new process is a directory"); 1197 error ("Specified program for new process is a directory");
1196 } 1198 }
1197 1199
1198 for (i = 3; i < nargs; i++) 1200 for (i = 3; i < nargs; i++)