Commit 3c16eda5 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Remove XEmacs compat code from pascal.el

* lisp/progmodes/pascal.el (pascal-mark-defun): Remove XEmacs compat.
parent c2e27949
...@@ -510,9 +510,7 @@ This puts the mark at the end, and point at the beginning." ...@@ -510,9 +510,7 @@ This puts the mark at the end, and point at the beginning."
(push-mark) (push-mark)
(pascal-end-of-defun) (pascal-end-of-defun)
(push-mark) (push-mark)
(pascal-beg-of-defun) (pascal-beg-of-defun))
(when (featurep 'xemacs)
(zmacs-activate-region)))
(defun pascal-comment-area (start end) (defun pascal-comment-area (start end)
"Put the region into a Pascal comment.\\<pascal-mode-map> "Put the region into a Pascal comment.\\<pascal-mode-map>
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment