diff options
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/vc-hooks.el | 5 |
2 files changed, 10 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 879d9646e04..4ec6319b06b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2007-08-06 Jason Rumney <jasonr@gnu.org> | ||
| 2 | |||
| 3 | * menu-bar.el (menu-bar-vc-filter): Use vc-call-backend. | ||
| 4 | |||
| 5 | * vc-hooks.el (vc-call): Add doc string. | ||
| 6 | |||
| 1 | 2007-08-06 Michael Albinus <michael.albinus@gmx.de> | 7 | 2007-08-06 Michael Albinus <michael.albinus@gmx.de> |
| 2 | 8 | ||
| 3 | * net/ange-ftp.el (ange-ftp-hook-function): Catch also errors in | 9 | * net/ange-ftp.el (ange-ftp-hook-function): Catch also errors in |
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index 09001e59691..d38bc000465 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el | |||
| @@ -279,7 +279,10 @@ It is usually called via the `vc-call' macro." | |||
| 279 | (t (apply f args))))) | 279 | (t (apply f args))))) |
| 280 | 280 | ||
| 281 | (defmacro vc-call (fun file &rest args) | 281 | (defmacro vc-call (fun file &rest args) |
| 282 | ;; BEWARE!! `file' is evaluated twice!! | 282 | "A convenience macro for calling VC backend functions. |
| 283 | Functions called by this macro must accept FILE as the first argument. | ||
| 284 | ARGS specifies any additional arguments. FUN should be unquoted. | ||
| 285 | BEWARE!! `file' is evaluated twice!!" | ||
| 283 | `(vc-call-backend (vc-backend ,file) ',fun ,file ,@args)) | 286 | `(vc-call-backend (vc-backend ,file) ',fun ,file ,@args)) |
| 284 | 287 | ||
| 285 | (defsubst vc-parse-buffer (pattern i) | 288 | (defsubst vc-parse-buffer (pattern i) |