summaryrefslogtreecommitdiffstats
path: root/Misc/python-mode.el
diff options
context:
space:
mode:
authorBarry Warsaw <barry@python.org>1995-03-08 22:05:16 (GMT)
committerBarry Warsaw <barry@python.org>1995-03-08 22:05:16 (GMT)
commit74d9cc5b7371c1d6907a1cc525a8212723b81c26 (patch)
tree64a8276dbef8ad50fd9e134d0e80451b40c9f47e /Misc/python-mode.el
parentc723b75fe32b74495d9a421faefad4d54a41a674 (diff)
downloadcpython-74d9cc5b7371c1d6907a1cc525a8212723b81c26.zip
cpython-74d9cc5b7371c1d6907a1cc525a8212723b81c26.tar.gz
cpython-74d9cc5b7371c1d6907a1cc525a8212723b81c26.tar.bz2
(py-keep-region-active): new function.
Diffstat (limited to 'Misc/python-mode.el')
-rw-r--r--Misc/python-mode.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/Misc/python-mode.el b/Misc/python-mode.el
index 29d61a8..43a43e3 100644
--- a/Misc/python-mode.el
+++ b/Misc/python-mode.el
@@ -1553,7 +1553,6 @@ local bindings to py-newline-and-indent."))
;; Helper functions
-
(defvar py-parse-state-re
(concat
"^[ \t]*\\(if\\|elif\\|else\\|while\\|def\\|class\\)\\>"
@@ -1795,6 +1794,13 @@ local bindings to py-newline-and-indent."))
(set-buffer cbuf))
(sit-for 0))
+(defun py-keep-region-active ()
+ ;; do whatever is necessary to keep the region active in XEmacs.
+ ;; Ignore byte-compiler warnings you might see. Also note that
+ ;; FSF's Emacs 19 does it differently and doesn't its policy doesn't
+ ;; require us to take explicit action.
+ (and (boundp 'zmacs-region-stays)
+ (setq zmacs-region-stays t)))
(defconst py-version "$Revision$"