* lisp/dabbrev.el (dabbrev-expand): Make "no expansion found" a user-error.

aa0382bd · Stefan Monnier · c8e32179 · aa0382bd · aa0382bd
Commit aa0382bd authored May 11, 2012 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +2 -0

lisp/dabbrev.el lisp/dabbrev.el +2 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
 2012-05-11  Stefan Monnier  <monnier@iro.umontreal.ca>

+	* dabbrev.el (dabbrev-expand): Make "no expansion found" a user-error.
+
 	* minibuffer.el (completion--twq-all): Again, allow case differences.

 	* term.el: Move keymap initialization code to be more idiomatic.

--- a/lisp/dabbrev.el
+++ b/lisp/dabbrev.el
@@ -527,8 +527,8 @@ See also `dabbrev-abbrev-char-regexp' and \\[dabbrev-completion]."
 	    (search-backward old)
 	    (insert abbrev)
 	    (delete-region (point) (+ (point) (length old)))))
-      (error "No%s dynamic expansion for `%s' found"
-	     (if old " further" "") abbrev))
+      (user-error "No%s dynamic expansion for `%s' found"
+                  (if old " further" "") abbrev))
     (t
      (if (not (or (eq dabbrev--last-buffer dabbrev--last-buffer-found)
 		   (minibuffer-window-active-p (selected-window))))