(py-keep-region-active): new function.

This commit is contained in:
Barry Warsaw 1995-03-08 22:05:16 +00:00
parent c723b75fe3
commit 74d9cc5b73
1 changed files with 7 additions and 1 deletions

View File

@ -1553,7 +1553,6 @@ local bindings to py-newline-and-indent."))
;; Helper functions ;; Helper functions
(defvar py-parse-state-re (defvar py-parse-state-re
(concat (concat
"^[ \t]*\\(if\\|elif\\|else\\|while\\|def\\|class\\)\\>" "^[ \t]*\\(if\\|elif\\|else\\|while\\|def\\|class\\)\\>"
@ -1795,6 +1794,13 @@ local bindings to py-newline-and-indent."))
(set-buffer cbuf)) (set-buffer cbuf))
(sit-for 0)) (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$" (defconst py-version "$Revision$"