Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 21:37:34 +00:00
Code Issues Projects Releases Packages 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
Show stats 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