Commit dd7c19d4 authored by Michael Kifer's avatar Michael Kifer
Browse files

(vip-leave-region-active): new function.

parent c9dd7f74
......@@ -577,6 +577,7 @@
(vip-change-cursor-color vip-replace-overlay-cursor-color)
)
(defsubst vip-hide-replace-overlay ()
(vip-set-replace-overlay-glyphs nil nil)
......@@ -643,7 +644,7 @@
;;; XEmacs compatibility
;; Sit for VAL miliseconds. XEmacs doesn't support the millisecond arg
;; Sit for VAL milliseconds. XEmacs doesn't support the millisecond arg
;; in sit-for, so this function smoothes out the differences.
(defsubst vip-sit-for-short (val &optional nodisp)
(if vip-xemacs-p
......@@ -675,6 +676,10 @@
(zmacs-deactivate-region)
(deactivate-mark)))
(defsubst vip-leave-region-active ()
(if vip-xemacs-p
(setq zmacs-region-stays t)))
(defsubst vip-events-to-keys (events)
(cond (vip-xemacs-p (events-to-keys events))
......
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