diff options
Diffstat (limited to 'lisp/cedet/semantic/edit.el')
| -rw-r--r-- | lisp/cedet/semantic/edit.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/edit.el b/lisp/cedet/semantic/edit.el index f207fced291..aa7131e9773 100644 --- a/lisp/cedet/semantic/edit.el +++ b/lisp/cedet/semantic/edit.el @@ -463,11 +463,11 @@ See `semantic-edits-change-leaf-tag' for details on parents." (defun semantic-parse-changes-failed (&rest args) "Signal that Semantic failed to parse changes. -That is, display a message by passing all ARGS to `format', then throw +That is, display a message by passing all ARGS to `format-message', then throw a 'semantic-parse-changes-failed exception with value t." (when semantic-edits-verbose-flag (message "Semantic parse changes failed: %S" - (apply 'format args))) + (apply #'format-message args))) (throw 'semantic-parse-changes-failed t)) (defsubst semantic-edits-incremental-fail () |