diff options
author | Alan Mackenzie <acm@muc.de> | 2022-01-22 11:02:50 +0000 |
---|---|---|
committer | Alan Mackenzie <acm@muc.de> | 2022-01-22 11:02:50 +0000 |
commit | 14d64a8adcc866deecd758b898e8ef2d836b354a (patch) | |
tree | 83cff9669e266f8e283ccb8cd7518e909240f1e1 /lisp/man.el | |
parent | bdd9b5b8a0d37dd09ee530c1dab3a44bee09e0f8 (diff) | |
parent | ebe334cdc234de2897263aed4c05ac7088c11857 (diff) | |
download | emacs-scratch/correct-warning-pos.tar.gz |
Merge branch 'master' into scratch/correct-warning-posscratch/correct-warning-pos
Diffstat (limited to 'lisp/man.el')
-rw-r--r-- | lisp/man.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/man.el b/lisp/man.el index d6146a2c4dc..a53a696c313 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -1993,11 +1993,13 @@ Uses `Man-name-local-regexp'." (skip-syntax-backward "^ ") (and (looking-at "[[:space:]]*\\([[:alnum:]_-]+([[:alnum:]]+)\\)") - (match-string 1))) - (define-key-after menu [man-separator] menu-bar-separator) + (match-string 1))) + (define-key-after menu [man-separator] menu-bar-separator + 'middle-separator) (define-key-after menu [man-at-mouse] - '(menu-item "Open man page" man-at-mouse - :help "Open man page around mouse click")))) + '(menu-item "Open man page" Man-at-mouse + :help "Open man page around mouse click") + 'man-separator))) menu) |