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