bug#64799: [PATCH] Add 'project-prompt-key' face

[Dmitry Gutov]

Version: 30.1

On 28/07/2023 06:33, Protesilaos Stavrou wrote:
> > From: Dmitry Gutov<dmitry@gutov.dev>
> > Date: Thu, 27 Jul 2023 04:28:08 +0300
> > [... 14 lines elided]
> > The change in format seems to go hand-in-hand with the change in face,
> > though, because help-key-binding has a box already.
> >
> > Does this look good to everybody?
> >
> > diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
> > index d482cc24d70..3611757fb82 100644
> > --- a/lisp/progmodes/project.el
> > +++ b/lisp/progmodes/project.el
> > @@ -1781,9 +1781,13 @@ project--keymap-prompt
> >         (let ((key (if key
> >                        (vector key)
> >                      (where-is-internal cmd (list project-prefix-map) t))))
> > -       (format "[%s] %s"
> > -               (propertize (key-description key) 'face 'bold)
> > -               label)))
> > +       (if (facep 'help-key-binding)
> > +           (format "%s %s"
> > +                   (propertize (key-description key) 'face
> > 'help-key-binding)
> > +                   label)
> > +         (format "[%s] %s"
> > +                 (propertize (key-description key) 'face 'bold)
> > +                 label))))
> >       project-switch-commands
> >       "  "))
> I am fine with this approach, thank you!

Now pushed to master, thanks all!