X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fminibuf.c;h=16174c5004158bb3926fcef0d44aaa3b4758c452;hp=c87858d3e3e001e8f933150e1efd6958448e68f3;hb=ea1ea793fe6e244ef5555ed983423a204101af13;hpb=399b9f4466f37412410de8ec4a08e3dc5504ad10 diff --git a/src/minibuf.c b/src/minibuf.c index c87858d..16174c5 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -936,9 +936,15 @@ syms_of_minibuf (void) } void -vars_of_minibuf (void) +reinit_vars_of_minibuf (void) { minibuf_level = 0; +} + +void +vars_of_minibuf (void) +{ + reinit_vars_of_minibuf (); staticpro (&Vminibuf_prompt); Vminibuf_prompt = Qnil; @@ -965,7 +971,7 @@ Each completion has to match all regexps in this list. } void -complex_vars_of_minibuf (void) +reinit_complex_vars_of_minibuf (void) { /* This function can GC */ #ifdef I18N3 @@ -974,8 +980,14 @@ complex_vars_of_minibuf (void) #endif Vminibuffer_zero = Fget_buffer_create - (Fpurecopy (build_string (DEFER_GETTEXT (" *Minibuf-0*")))); + (build_string (DEFER_GETTEXT (" *Minibuf-0*"))); Vecho_area_buffer = Fget_buffer_create - (Fpurecopy (build_string (DEFER_GETTEXT (" *Echo Area*")))); + (build_string (DEFER_GETTEXT (" *Echo Area*"))); +} + +void +complex_vars_of_minibuf (void) +{ + reinit_complex_vars_of_minibuf (); }