diff options
| author | Lars Ingebrigtsen | 2019-06-19 23:49:13 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-06-20 12:51:38 +0200 |
| commit | 3c16eda5f1d207bf5d345a28ec19ca7afb79647d (patch) | |
| tree | c364fd80d712778409d53bec56da5c60006a0f6e | |
| parent | c2e27949d5917256bb419dcdae73566079844b4d (diff) | |
| download | emacs-3c16eda5f1d207bf5d345a28ec19ca7afb79647d.tar.gz emacs-3c16eda5f1d207bf5d345a28ec19ca7afb79647d.zip | |
Remove XEmacs compat code from pascal.el
* lisp/progmodes/pascal.el (pascal-mark-defun): Remove XEmacs compat.
| -rw-r--r-- | lisp/progmodes/pascal.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el index cae514aa75b..26fb0a88c53 100644 --- a/lisp/progmodes/pascal.el +++ b/lisp/progmodes/pascal.el | |||
| @@ -510,9 +510,7 @@ This puts the mark at the end, and point at the beginning." | |||
| 510 | (push-mark) | 510 | (push-mark) |
| 511 | (pascal-end-of-defun) | 511 | (pascal-end-of-defun) |
| 512 | (push-mark) | 512 | (push-mark) |
| 513 | (pascal-beg-of-defun) | 513 | (pascal-beg-of-defun)) |
| 514 | (when (featurep 'xemacs) | ||
| 515 | (zmacs-activate-region))) | ||
| 516 | 514 | ||
| 517 | (defun pascal-comment-area (start end) | 515 | (defun pascal-comment-area (start end) |
| 518 | "Put the region into a Pascal comment.\\<pascal-mode-map> | 516 | "Put the region into a Pascal comment.\\<pascal-mode-map> |