summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChong Yidong <cyd@gnu.org>2012-03-11 23:45:44 +0800
committerChong Yidong <cyd@gnu.org>2012-03-11 23:45:44 +0800
commit0c93eabf3580a528e05ccc336df18ea4792d093f (patch)
treea4cb0cf3bcdf7c508d8fad264be3b2a1107fc053
parent091006330e4bf8a8e3a98fd2711372bb1a43eeee (diff)
downloademacs-0c93eabf3580a528e05ccc336df18ea4792d093f.tar.gz
* dabbrev.el (dabbrev--find-expansion): Update progress reporter.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/dabbrev.el1
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 50e012ad77b..49d67384920 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-03-11 Chong Yidong <cyd@gnu.org>
+
+ * dabbrev.el (dabbrev--find-expansion): Update progress reporter
+ when finished (Bug#10963).
+
2012-03-11 Martin Rudalics <rudalics@gmx.at>
* window.el (split-window-below): Fix bug in case where
diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el
index 7b94b53e6c7..aad3c83c32b 100644
--- a/lisp/dabbrev.el
+++ b/lisp/dabbrev.el
@@ -763,6 +763,7 @@ of the start of the occurrence."
(- (length dabbrev--friend-buffer-list)))
(setq dabbrev--last-expansion-location (point-min))
(setq expansion (dabbrev--try-find abbrev nil 1 ignore-case)))
+ (progress-reporter-done dabbrev--progress-reporter)
expansion)))))
;; Compute the list of buffers to scan.