[Emacs-diffs] Changes to emacs/lisp/emulation/viper.el,v

[Michael Kifer]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Michael Kifer <kifer>   08/04/03 21:04:20

Index: emulation/viper.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emulation/viper.el,v
retrieving revision 1.113
retrieving revision 1.114
diff -u -b -r1.113 -r1.114
--- emulation/viper.el  1 Mar 2008 20:11:47 -0000       1.113
+++ emulation/viper.el  3 Apr 2008 21:04:17 -0000       1.114
@@ -597,13 +597,14 @@
                    ))
              (viper-set-expert-level 'dont-change-unless)))
 
-       (if (eq major-mode 'viper-mode)
-           (setq major-mode 'fundamental-mode))
-
        (or (memq major-mode viper-emacs-state-mode-list) ; don't switch to Vi
            (memq major-mode viper-insert-state-mode-list) ; don't switch
            (viper-change-state-to-vi))
-       )))
+       ))
+
+  (if (eq major-mode 'viper-mode)
+      (setq major-mode 'fundamental-mode))
+  )
 
 
 ;; Apply a little heuristic to invoke vi state on major-modes