Mercurial > hg > xemacs-beta

comparison src/callproc.c @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents 30d2cfa1092a
children cc15677e0335
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
222 * called by various filename-hacking routines might relocate strings */ 222 * called by various filename-hacking routines might relocate strings */
223 /* Make sure that the child will be able to chdir to the current 223 /* Make sure that the child will be able to chdir to the current
224 buffer's current directory. We can't just have the child check 224 buffer's current directory. We can't just have the child check
225 for an error when it does the chdir, since it's in a vfork. */ 225 for an error when it does the chdir, since it's in a vfork. */
226 226
227 current_dir = current_buffer->directory;
227 NGCPRO2 (current_dir, path); /* Caller gcprotects args[] */ 228 NGCPRO2 (current_dir, path); /* Caller gcprotects args[] */
228 current_dir = current_buffer->directory;
229 current_dir = Funhandled_file_name_directory (current_dir); 229 current_dir = Funhandled_file_name_directory (current_dir);
230 current_dir = expand_and_dir_to_file (current_dir, Qnil); 230 current_dir = expand_and_dir_to_file (current_dir, Qnil);
231 #if 0 231 #if 0
232 /* This is in FSF, but it breaks everything in the presence of 232 /* This is in FSF, but it breaks everything in the presence of
233 ange-ftp-visited files, so away with it. */ 233 ange-ftp-visited files, so away with it. */