diff options
| -rw-r--r-- | lisp/pcvs.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/pcvs.el b/lisp/pcvs.el index 1e9f1bce7ce..0f0ff76ed0c 100644 --- a/lisp/pcvs.el +++ b/lisp/pcvs.el | |||
| @@ -775,6 +775,7 @@ clear what alternative to use. | |||
| 775 | For interactive use, use `" (symbol-name fun) "' instead.") | 775 | For interactive use, use `" (symbol-name fun) "' instead.") |
| 776 | ,interact | 776 | ,interact |
| 777 | ,@body) | 777 | ,@body) |
| 778 | (put ',fun-1 'definition-name ',fun) | ||
| 778 | (defun ,fun () | 779 | (defun ,fun () |
| 779 | ,(concat line1 "\nWrapper function that switches to a *cvs* buffer | 780 | ,(concat line1 "\nWrapper function that switches to a *cvs* buffer |
| 780 | before calling the real function `" (symbol-name fun-1) "'.\n") | 781 | before calling the real function `" (symbol-name fun-1) "'.\n") |