[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/replace.el
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/replace.el |
Date: |
Sat, 19 Feb 2005 08:09:38 -0500 |
Index: emacs/lisp/replace.el
diff -c emacs/lisp/replace.el:1.204 emacs/lisp/replace.el:1.205
*** emacs/lisp/replace.el:1.204 Wed Feb 16 09:49:45 2005
--- emacs/lisp/replace.el Sat Feb 19 13:09:37 2005
***************
*** 115,122 ****
query-replace-from-history-variable
nil t t))))
(if (and (zerop (length from)) lastto lastfrom)
! (cons lastfrom
! (query-replace-compile-replacement lastto regexp-flag))
;; Warn if user types \n or \t, but don't reject the input.
(and regexp-flag
(string-match "\\(\\`\\|[^\\]\\)\\(\\\\\\\\\\)*\\(\\\\[nt]\\)"
from)
--- 115,125 ----
query-replace-from-history-variable
nil t t))))
(if (and (zerop (length from)) lastto lastfrom)
! (progn
! (cons lastfrom
! (query-replace-compile-replacement lastto regexp-flag))
! (set query-replace-from-history-variable
! (cdr (symbol-value query-replace-from-history-variable))))
;; Warn if user types \n or \t, but don't reject the input.
(and regexp-flag
(string-match "\\(\\`\\|[^\\]\\)\\(\\\\\\\\\\)*\\(\\\\[nt]\\)"
from)