From 136351b74209e0a8ee9241b600cf5d5d2f67d30d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 3 Jun 1993 22:07:18 +0000 Subject: [PATCH] (init_buffer): Init default-directory of minibuffer. --- src/buffer.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/buffer.c b/src/buffer.c index c6212beda77..be94972ee87 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -1972,6 +1972,7 @@ init_buffer () char buf[MAXPATHLEN+1]; char *pwd; struct stat dotstat, pwdstat; + Lisp_Object temp; Fset_buffer (Fget_buffer_create (build_string ("*scratch*"))); @@ -1994,6 +1995,9 @@ init_buffer () strcat (buf, "/"); #endif /* not VMS */ current_buffer->directory = build_string (buf); + + temp = get_minibuffer (0); + XBUFFER (temp)->directory = current_buffer->directory; } /* initialize the buffer routines */