[Emacs-diffs] emacs/lisp ChangeLog emulation/viper-cmd.el emu...

[Michael Kifer]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Michael Kifer <kifer>   08/11/22 06:29:12

Modified files:
        lisp           : ChangeLog 
        lisp/emulation : viper-cmd.el viper-init.el viper.el 

Log message:
        2008-11-22  Michael Kifer  <address@hidden>
                
                * viper.el: date change.
                
                * viper-cmd.el (viper-envelop-ESC-key):
                viper-translate-all-ESC-keysequences is now a function.
                
                * viper-init (viper-translate-all-ESC-keysequences): make this 
variable

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14828&r2=1.14829
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emulation/viper-cmd.el?cvsroot=emacs&r1=1.79&r2=1.80
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emulation/viper-init.el?cvsroot=emacs&r1=1.55&r2=1.56
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emulation/viper.el?cvsroot=emacs&r1=1.118&r2=1.119

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14828
retrieving revision 1.14829
diff -u -b -r1.14828 -r1.14829
--- ChangeLog   22 Nov 2008 05:23:42 -0000      1.14828
+++ ChangeLog   22 Nov 2008 06:29:09 -0000      1.14829
@@ -1,3 +1,12 @@
+2008-11-22  Michael Kifer  <address@hidden>
+       
+       * viper.el: date change.
+       
+       * viper-cmd.el (viper-envelop-ESC-key):
+       viper-translate-all-ESC-keysequences is now a function.
+       
+       * viper-init (viper-translate-all-ESC-keysequences): make this variable
+       
 2008-11-22  Stefan Monnier  <address@hidden>
 
        * vc-hooks.el (vc-follow-link, vc-find-file-hook):

Index: emulation/viper-cmd.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emulation/viper-cmd.el,v
retrieving revision 1.79
retrieving revision 1.80
diff -u -b -r1.79 -r1.80
--- emulation/viper-cmd.el      17 Nov 2008 02:24:19 -0000      1.79
+++ emulation/viper-cmd.el      22 Nov 2008 06:29:11 -0000      1.80
@@ -1046,7 +1046,7 @@
                (let* ((first-key (elt keyseq 0))
                       (key-mod (event-modifiers first-key)))
                  (cond ((and (viper-ESC-event-p first-key)
-                             (not viper-translate-all-ESC-keysequences))
+                             (not (viper-translate-all-ESC-keysequences)))
                         ;; put keys following ESC on the unread list
                         ;; and return ESC as the key-sequence
                         (viper-set-unread-command-events (viper-subseq keyseq 
1))

Index: emulation/viper-init.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emulation/viper-init.el,v
retrieving revision 1.55
retrieving revision 1.56
diff -u -b -r1.55 -r1.56
--- emulation/viper-init.el     16 Nov 2008 04:55:47 -0000      1.55
+++ emulation/viper-init.el     22 Nov 2008 06:29:11 -0000      1.56
@@ -525,18 +525,10 @@
   :type 'integer
   :group 'viper-misc)
 
-(defcustom viper-translate-all-ESC-keysequences (not (viper-window-display-p))
-  "Allow translation of all key sequences into commands.
-Normally, Viper lets Emacs translate only those ESC key sequences that are
-defined in the low-level key-translation-map or function-key-map, such as those
-emitted by the arrow and function keys. Other sequences, e.g., \\e/, are
-treated as ESC command followed by a `/'. This is done for people who type fast
-and tend to hit other characters right after they hit ESC. Other people like
-Emacs to translate ESC sequences all the time.
-The default is to translate all sequences only when using a dumb terminal.
-This permits you to use ESC as a meta key in insert mode."
-  :type 'boolean
-  :group 'viper-misc)
+;; This function determines if ESC key sequences are to be translated into
+;; commands.
+(defun viper-translate-all-ESC-keysequences ()
+  (not (viper-window-display-p)))
 
 ;; Modes and related variables
 

Index: emulation/viper.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emulation/viper.el,v
retrieving revision 1.118
retrieving revision 1.119
diff -u -b -r1.118 -r1.119
--- emulation/viper.el  16 Nov 2008 05:02:33 -0000      1.118
+++ emulation/viper.el  22 Nov 2008 06:29:11 -0000      1.119
@@ -14,7 +14,7 @@
 ;; filed in the Emacs bug reporting system against this file, a copy
 ;; of the bug report be sent to the maintainer's email address.
 
-(defconst viper-version "3.14 of November 16, 2008"
+(defconst viper-version "3.14 of November 22, 2008"
   "The current version of Viper")
 
 ;; This file is part of GNU Emacs.