Mercurial > hg > xemacs-beta
diff lisp/etags.el @ 4755:c1784fd59d7d
Fix syntax of some uses of condition-case and with-trapping-errors.
| author | Stephen J. Turnbull <stephen@xemacs.org> |
|---|---|
| date | Wed, 18 Nov 2009 01:10:56 +0900 |
| parents | 0750eca4d23a |
| children | 0d43872986b6 |
line wrap: on
line diff
--- a/lisp/etags.el Wed Nov 18 01:06:53 2009 +0900 +++ b/lisp/etags.el Wed Nov 18 01:10:56 2009 +0900 @@ -633,7 +633,7 @@ (defun find-tag-default () (or (and (not (memq find-tag-default-hook '(nil find-tag-default))) (with-trapping-errors - :function 'find-tag-default-hook + :operation 'find-tag-default-hook :error-form nil (funcall find-tag-default-hook))) (symbol-near-point)))