[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r100386: * isearch.el (isearch-update
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r100386: * isearch.el (isearch-update-post-hook): New hook. |
Date: |
Fri, 21 May 2010 01:16:19 +0300 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 100386
author: Mark A. Hershberger <address@hidden>
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Fri 2010-05-21 01:16:19 +0300
message:
* isearch.el (isearch-update-post-hook): New hook.
(isearch-update): Use the new hook. (Bug#6225)
modified:
etc/NEWS
lisp/ChangeLog
lisp/isearch.el
=== modified file 'etc/NEWS'
--- a/etc/NEWS 2010-05-20 21:33:58 +0000
+++ b/etc/NEWS 2010-05-20 22:16:19 +0000
@@ -255,6 +255,10 @@
*** `image-extension-data' is renamed to `image-metadata'.
+** Isearch
+
+*** New hook `isearch-update-post-hook' that runs in `isearch-update'.
+
** Progress reporters can now "spin".
The MIN-VALUE and MAX-VALUE arguments of `make-progress-reporter' can
now be nil, or omitted. This makes a "non-numeric" reporter. Each
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-05-20 22:01:57 +0000
+++ b/lisp/ChangeLog 2010-05-20 22:16:19 +0000
@@ -1,3 +1,8 @@
+2010-05-20 Mark A. Hershberger <address@hidden>
+
+ * isearch.el (isearch-update-post-hook): New hook.
+ (isearch-update): Use the new hook. (Bug#6225)
+
2010-05-20 Juri Linkov <address@hidden>
* isearch.el (isearch-mode-map): Bind more keys to isearch-help-map:
=== modified file 'lisp/isearch.el'
--- a/lisp/isearch.el 2010-05-20 22:01:57 +0000
+++ b/lisp/isearch.el 2010-05-20 22:16:19 +0000
@@ -156,6 +156,9 @@
(defvar isearch-mode-hook nil
"Function(s) to call after starting up an incremental search.")
+(defvar isearch-update-post-hook nil
+ "Function(s) to call after isearch has found matches in the buffer.")
+
(defvar isearch-mode-end-hook nil
"Function(s) to call after terminating an incremental search.
When these functions are called, `isearch-mode-end-hook-quit'
@@ -870,7 +873,8 @@
(isearch-lazy-highlight-new-loop))
;; We must prevent the point moving to the end of composition when a
;; part of the composition has just been searched.
- (setq disable-point-adjustment t))
+ (setq disable-point-adjustment t)
+ (run-hooks 'isearch-update-post-hook))
(defun isearch-done (&optional nopush edit)
"Exit Isearch mode.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r100386: * isearch.el (isearch-update-post-hook): New hook.,
Juri Linkov <=