bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#14942: 24.3.50; Improve key descriptions for facemenu menu items


From: Eli Zaretskii
Subject: bug#14942: 24.3.50; Improve key descriptions for facemenu menu items
Date: Fri, 29 Apr 2016 16:35:18 +0300

> From: Lars Ingebrigtsen <larsi@gnus.org>
> Date: Fri, 29 Apr 2016 15:18:17 +0200
> Cc: 14942@debbugs.gnu.org
> 
> Drew Adams <drew.adams@oracle.com> writes:
> 
> > `C-h f facemenu-set-invisible' says that the command is bound to
> > <C-down-mouse-2> <sp> v, <menu-bar> <edit> <props> <sp> v.
> 
> [...]
> 
> > This would be a lot more helpful for users if we simply used reasonable
> > names for the menu-item pseudo-function keys.  Instead of <sp> use
> > <special-properties> and things suddenly become much clearer.
> 
> What is <sp> meant to express, anyway?  I thought perhaps it was a
> keyboard shortcut, but nothing I press after C-down-mouse-2 seem to do
> anything...
> 
> And neither does the v.

Use the source, Lars:

  (defvar facemenu-special-menu
    (let ((map (make-sparse-keymap "Special")))
      (define-key map [?s] (cons (purecopy "Remove Special")
                                 'facemenu-remove-special))
      (define-key map [?t] (cons (purecopy "Intangible")
                                 'facemenu-set-intangible))
      (define-key map [?v] (cons (purecopy "Invisible")
                                 'facemenu-set-invisible))
      (define-key map [?r] (cons (purecopy "Read-Only")
                                 'facemenu-set-read-only))
      map)
    "Menu keymap for non-face text-properties.")
  (defalias 'facemenu-special-menu facemenu-special-menu)
  [...]
  (let ((map facemenu-menu))
    (define-key map [in] (cons (purecopy "Indentation")
                               'facemenu-indentation-menu))
    (define-key map [ju] (cons (purecopy "Justification")
                               'facemenu-justification-menu))
    (define-key map [s2] (list (purecopy "--")))
    (define-key map [sp] (cons (purecopy "Special Properties")  <<<<<<<<<
                    ^^^^       'facemenu-special-menu))
    (define-key map [bg] (cons (purecopy "Background Color")
                               'facemenu-background-menu))
    (define-key map [fg] (cons (purecopy "Foreground Color")
                               'facemenu-foreground-menu))
    (define-key map [fc] (cons (purecopy "Face")
                               'facemenu-face-menu)))






reply via email to

[Prev in Thread] Current Thread [Next in Thread]