\f
(defun py-keep-region-active ()
- ;; Do whatever is necessary to keep the region active in
- ;; XEmacs 19. This is unnecessary, but no-op in Emacs 19, so just
- ;; ignore byte-compiler warnings you might see.
+ ;; 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)))
+
;; electric characters
(defun py-outdent-p ()
;; returns non-nil if the current line should outdent one level
((py-continuation-line-p)
(let ((startpos (point))
(open-bracket-pos (py-nesting-level))
- endpos searching found)
+ endpos searching found state)
(if open-bracket-pos
(progn
;; align with first item in list; else a normal
(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)))
\f
(defconst py-version "$Revision$"