martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove XEmacs compat code from checkdoc.el

Browse Source 
* lisp/emacs-lisp/checkdoc.el (checkdoc-minor-mode-map): Remove
XEmacs compat code.
This commit is contained in:
Lars Ingebrigtsen
2019-06-20 01:13:07 +02:00
parent 717a99dacf
commit 4e0baad410
1 changed files with 3 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/emacs-lisp/checkdoc.el
View File

@@ -1174,9 +1174,8 @@ TEXT, START, END and UNFIXABLE conform to
;; Override some bindings
(define-key map "\C-\M-x" 'checkdoc-eval-defun)
(define-key map "\C-x`" 'checkdoc-continue)
(if (not (featurep 'xemacs))
(define-key map [menu-bar emacs-lisp eval-buffer]
'checkdoc-eval-current-buffer))
(define-key map [menu-bar emacs-lisp eval-buffer]
'checkdoc-eval-current-buffer)
;; Add some new bindings under C-c ?
(define-key pmap "x" 'checkdoc-defun)
(define-key pmap "X" 'checkdoc-ispell-defun)
@@ -1229,10 +1228,7 @@ TEXT, START, END and UNFIXABLE conform to
["Check Defun" checkdoc-defun t]
["Check and Spell Defun" checkdoc-ispell-defun t]
["Check and Evaluate Defun" checkdoc-eval-defun t]
["Check and Evaluate Buffer" checkdoc-eval-current-buffer t]
))
;; XEmacs requires some weird stuff to add this menu in a minor mode.
;; What is it?
["Check and Evaluate Buffer" checkdoc-eval-current-buffer t]))
;;;###autoload
(define-minor-mode checkdoc-minor-mode