diff lisp/emulation/viper-init.el @ 19756:22c1e47f66e1

new version
author Michael Kifer <kifer@cs.stonybrook.edu>
date Fri, 05 Sep 1997 04:48:58 +0000
parents a3240ad2e954
children 9bc6a4017c8c
line wrap: on
line diff
--- a/lisp/emulation/viper-init.el	Fri Sep 05 03:51:07 1997 +0000
+++ b/lisp/emulation/viper-init.el	Fri Sep 05 04:48:58 1997 +0000
@@ -420,7 +420,9 @@
 is non-nil."
   :type 'string
   :group 'viper)
-(defcustom viper-use-replace-region-delimiters (not (viper-has-face-support-p))
+(defcustom viper-use-replace-region-delimiters 
+  (or (not (viper-has-face-support-p))
+      (and viper-xemacs-p (eq (viper-device-type) 'tty)))
   "*If non-nil, Viper will always use `viper-replace-region-end-delimiter' and
 `viper-replace-region-start-delimiter' to delimit replacement regions, even on
 color displays. By default, the delimiters are used only on TTYs."
@@ -979,7 +981,7 @@
 ;; Hook, specific to Viper, which is run just *before* exiting the minibuffer.
 ;; Beginning with Emacs 19.26, the standard `minibuffer-exit-hook' is run
 ;; *after* exiting the minibuffer
-(defvar viper-minibuffer-exit-hook nil)
+(defvar viper-minibuffer-exit-hook '(viper-minibuffer-trim-tail))
        
 
 ;; Mode line