Parent Directory | Revision Log | Patch
revision 1.449 by pj, Wed Jun 5 05:16:48 2002 UTC | revision 1.450 by lektu, Wed Jun 26 08:43:23 2002 UTC | |
---|---|---|
# | Line 5845 static Lisp_Object | Line 5845 static Lisp_Object |
5845 | read_file_name_cleanup (arg) | read_file_name_cleanup (arg) |
5846 | Lisp_Object arg; | Lisp_Object arg; |
5847 | { | { |
5848 | current_buffer->directory = arg; | return (current_buffer->directory = arg); |
5849 | } | } |
5850 | ||
5851 | DEFUN ("read-file-name-internal", Fread_file_name_internal, Sread_file_name_internal, | DEFUN ("read-file-name-internal", Fread_file_name_internal, Sread_file_name_internal, |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |