comparison src/textprop.c @ 100688:8233f3e2beb4

* textprop.c (Qminibuffer_prompt): New variable. (syms_of_textprop): Initialize it. * callint.c (Fcall_interactively): For `c', `k', and `K' prompt in minibuffer-prompt face. (Bug#1662)
author Martin Rudalics <rudalics@gmx.at>
date Fri, 26 Dec 2008 09:39:49 +0000
parents 00ce595f8afc
children e038c1a8307c
comparison
equal deleted inserted replaced
100687:245c01516a02 100688:8233f3e2beb4
55 Lisp_Object Qlocal_map; 55 Lisp_Object Qlocal_map;
56 56
57 /* Visual properties text (including strings) may have. */ 57 /* Visual properties text (including strings) may have. */
58 Lisp_Object Qforeground, Qbackground, Qfont, Qunderline, Qstipple; 58 Lisp_Object Qforeground, Qbackground, Qfont, Qunderline, Qstipple;
59 Lisp_Object Qinvisible, Qread_only, Qintangible, Qmouse_face; 59 Lisp_Object Qinvisible, Qread_only, Qintangible, Qmouse_face;
60 Lisp_Object Qminibuffer_prompt;
60 61
61 /* Sticky properties */ 62 /* Sticky properties */
62 Lisp_Object Qfront_sticky, Qrear_nonsticky; 63 Lisp_Object Qfront_sticky, Qrear_nonsticky;
63 64
64 /* If o1 is a cons whose cdr is a cons, return non-zero and set o2 to 65 /* If o1 is a cons whose cdr is a cons, return non-zero and set o2 to
2332 Qfront_sticky = intern ("front-sticky"); 2333 Qfront_sticky = intern ("front-sticky");
2333 staticpro (&Qrear_nonsticky); 2334 staticpro (&Qrear_nonsticky);
2334 Qrear_nonsticky = intern ("rear-nonsticky"); 2335 Qrear_nonsticky = intern ("rear-nonsticky");
2335 staticpro (&Qmouse_face); 2336 staticpro (&Qmouse_face);
2336 Qmouse_face = intern ("mouse-face"); 2337 Qmouse_face = intern ("mouse-face");
2338 staticpro (&Qminibuffer_prompt);
2339 Qminibuffer_prompt = intern ("minibuffer-prompt");
2337 2340
2338 /* Properties that text might use to specify certain actions */ 2341 /* Properties that text might use to specify certain actions */
2339 2342
2340 staticpro (&Qmouse_left); 2343 staticpro (&Qmouse_left);
2341 Qmouse_left = intern ("mouse-left"); 2344 Qmouse_left = intern ("mouse-left");