diff options
| author | Richard M. Stallman | 2004-12-10 01:52:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-12-10 01:52:43 +0000 |
| commit | ec06d344a39d0aab91909f368831f67de3ac5250 (patch) | |
| tree | c8850dfa4fa06c31b887b2ec73a458e2382b64cb | |
| parent | 21fa4a775ba51f585f72582ac0ef5a7b843ce11e (diff) | |
| download | emacs-ec06d344a39d0aab91909f368831f67de3ac5250.tar.gz emacs-ec06d344a39d0aab91909f368831f67de3ac5250.zip | |
(isearch-mode-map): Treat S-SPC like SPC.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/isearch.el | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f446d70d9ca..3d3994cd248 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2004-12-09 Richard M. Stallman <rms@gnu.org> | ||
| 2 | |||
| 3 | * isearch.el (isearch-mode-map): Treat S-SPC like SPC. | ||
| 4 | |||
| 1 | 2004-12-10 Nick Roberts <nickrob@snap.net.nz> | 5 | 2004-12-10 Nick Roberts <nickrob@snap.net.nz> |
| 2 | 6 | ||
| 3 | * xt-mouse.el (xterm-mouse-event): Correct cursor position in a | 7 | * xt-mouse.el (xterm-mouse-event): Correct cursor position in a |
diff --git a/lisp/isearch.el b/lisp/isearch.el index 53d2ab1c4fb..77139988bb1 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -229,6 +229,7 @@ Default value, nil, means edit the string instead." | |||
| 229 | (while (< i 256) | 229 | (while (< i 256) |
| 230 | (define-key map (vector i) 'isearch-printing-char) | 230 | (define-key map (vector i) 'isearch-printing-char) |
| 231 | (setq i (1+ i))) | 231 | (setq i (1+ i))) |
| 232 | (define-key map (vector i) 'isearch-printing-char) | ||
| 232 | 233 | ||
| 233 | ;; To handle local bindings with meta char prefix keys, define | 234 | ;; To handle local bindings with meta char prefix keys, define |
| 234 | ;; another full keymap. This must be done for any other prefix | 235 | ;; another full keymap. This must be done for any other prefix |
| @@ -262,6 +263,7 @@ Default value, nil, means edit the string instead." | |||
| 262 | (define-key map "\r" 'isearch-exit) | 263 | (define-key map "\r" 'isearch-exit) |
| 263 | (define-key map "\C-j" 'isearch-printing-char) | 264 | (define-key map "\C-j" 'isearch-printing-char) |
| 264 | (define-key map "\t" 'isearch-printing-char) | 265 | (define-key map "\t" 'isearch-printing-char) |
| 266 | (define-key map [?\S-\ ] 'isearch-printing-char) | ||
| 265 | 267 | ||
| 266 | (define-key map "\C-w" 'isearch-yank-word-or-char) | 268 | (define-key map "\C-w" 'isearch-yank-word-or-char) |
| 267 | (define-key map "\M-\C-w" 'isearch-del-char) | 269 | (define-key map "\M-\C-w" 'isearch-del-char) |