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.