diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-05-13 12:43:15 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-05-13 14:35:00 +0200 |
| commit | 7df302d2859b5fa8924b9b2b2dea90fe9f2002b9 (patch) | |
| tree | 1720b9b4fa4d70ef7fb85a737ccbd7e00561726f /lisp/progmodes/pascal.el | |
| parent | 87eed0704153bcf3b1b01ff3414f2ccb112457e7 (diff) | |
| download | emacs-7df302d2859b5fa8924b9b2b2dea90fe9f2002b9.tar.gz emacs-7df302d2859b5fa8924b9b2b2dea90fe9f2002b9.tar.bz2 emacs-7df302d2859b5fa8924b9b2b2dea90fe9f2002b9.zip | |
Remove some XEmacs compat code from pascal.el
* lisp/progmodes/pascal.el (pascal-outline-map): Remove XEmacs compat
code.
Diffstat (limited to 'lisp/progmodes/pascal.el')
| -rw-r--r-- | lisp/progmodes/pascal.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el index 8dc03b72b1e..351ea6e3a99 100644 --- a/lisp/progmodes/pascal.el +++ b/lisp/progmodes/pascal.el @@ -47,8 +47,8 @@ ;; "reset" "rewrite" "write" "writeln") ;; pascal-separator-keywords '("downto" "else" "mod" "div" "then")) -;; KNOWN BUGS / BUGREPORTS -;; ======================= +;; KNOWN BUGS / BUG REPORTS +;; ======================== ;; As far as I know, there are no bugs in the current version of this ;; package. This may not be true however, since I never use this mode ;; myself and therefore would never notice them anyway. If you do @@ -1382,8 +1382,6 @@ The default is a name found in the buffer around point." ;;; (defvar pascal-outline-map (let ((map (make-sparse-keymap))) - (if (fboundp 'set-keymap-name) - (set-keymap-name map 'pascal-outline-map)) (define-key map "\M-\C-a" 'pascal-outline-prev-defun) (define-key map "\M-\C-e" 'pascal-outline-next-defun) (define-key map "\C-c\C-d" 'pascal-outline-goto-defun) |