[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/replace.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/replace.el [emacs-unicode-2] |
Date: |
Thu, 09 Sep 2004 08:06:19 -0400 |
Index: emacs/lisp/replace.el
diff -c emacs/lisp/replace.el:1.165.4.8 emacs/lisp/replace.el:1.165.4.9
*** emacs/lisp/replace.el:1.165.4.8 Tue Aug 3 00:02:59 2004
--- emacs/lisp/replace.el Thu Sep 9 09:36:31 2004
***************
*** 618,623 ****
--- 618,624 ----
(define-key map "g" 'revert-buffer)
(define-key map "q" 'quit-window)
(define-key map "z" 'kill-this-buffer)
+ (define-key map "\C-c\C-f" 'next-error-follow-minor-mode)
map)
"Keymap for `occur-mode'.")
***************
*** 1392,1398 ****
;; Bind message-log-max so we don't fill up the message log
;; with a bunch of identical messages.
(let ((message-log-max nil))
! (message message from-string next-replacement))
(setq key (read-event))
;; Necessary in case something happens during read-event
;; that clobbers the match data.
--- 1393,1401 ----
;; Bind message-log-max so we don't fill up the message log
;; with a bunch of identical messages.
(let ((message-log-max nil))
! (message message
! (query-replace-descr from-string)
! (query-replace-descr next-replacement)))
(setq key (read-event))
;; Necessary in case something happens during read-event
;; that clobbers the match data.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/replace.el [emacs-unicode-2],
Miles Bader <=