mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

2008-11-22 Michael Kifer <kifer@cs.stonybrook.edu>

Browse Source 
* 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
This commit is contained in:
Michael Kifer 2008-11-22 06:29:09 +00:00
parent 33f95a82e9
commit 8c3ad6c483
4 changed files with 15 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/ChangeLog
View File

@ -1,3 +1,12 @@
2008-11-22 Michael Kifer <kifer@cs.stonybrook.edu>
* 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 <monnier@iro.umontreal.ca>
* vc-hooks.el (vc-follow-link, vc-find-file-hook):

2
lisp/emulation/viper-cmd.el
View File

@ -1046,7 +1046,7 @@ as a Meta key and any number of multiple escapes is allowed."
(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))

16
lisp/emulation/viper-init.el
View File

@ -525,18 +525,10 @@ will make it hard to use Vi-style timeout macros."
: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

2
lisp/emulation/viper.el
View File

@ -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.