comparison src/process.c @ 116:9f59509498e1 r20-1b10

Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents 8619ce7e4c50
children cca96a509cfe
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
1193 tem = Fexpand_file_name (tem, Qnil); 1193 tem = Fexpand_file_name (tem, Qnil);
1194 new_argv[0] = (char *) XSTRING_DATA (tem); 1194 new_argv[0] = (char *) XSTRING_DATA (tem);
1195 } 1195 }
1196 else 1196 else
1197 { 1197 {
1198 /* #### dmoore - file-directory-p can call lisp, make sure everything
1199 here protects itself. */
1198 if (!NILP (Ffile_directory_p (program))) 1200 if (!NILP (Ffile_directory_p (program)))
1199 error ("Specified program for new process is a directory"); 1201 error ("Specified program for new process is a directory");
1200 } 1202 }
1201 1203
1202 for (i = 3; i < nargs; i++) 1204 for (i = 3; i < nargs; i++)