diff options
| -rw-r--r-- | lisp/cedet/semantic/analyze/complete.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/analyze/complete.el b/lisp/cedet/semantic/analyze/complete.el index b471c0d1a13..b473ade1594 100644 --- a/lisp/cedet/semantic/analyze/complete.el +++ b/lisp/cedet/semantic/analyze/complete.el @@ -93,8 +93,10 @@ in a buffer." context (semantic-analyze-current-context context))) (ans (if (not context) - (error "Nothing to complete") - (:override)))) + (when (called-interactively-p 'any) + (error "Nothing to complete")) + (with-demoted-errors "%S" + (:override))))) ;; If interactive, display them. (when (called-interactively-p 'any) (with-output-to-temp-buffer "*Possible Completions*" |