/[emacs]/emacs/lisp/pcvs.el
ViewVC logotype

Diff of /emacs/lisp/pcvs.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.88 by monnier, Sat Oct 15 12:04:33 2005 UTC revision 1.89 by jurta, Thu Dec 8 07:49:07 2005 UTC
# Line 775  clear what alternative to use. Line 775  clear what alternative to use.
775  For interactive use, use `" (symbol-name fun) "' instead.")  For interactive use, use `" (symbol-name fun) "' instead.")
776               ,interact               ,interact
777               ,@body)               ,@body)
778               (put ',fun-1 'definition-name ',fun)
779             (defun ,fun ()             (defun ,fun ()
780               ,(concat line1 "\nWrapper function that switches to a *cvs* buffer               ,(concat line1 "\nWrapper function that switches to a *cvs* buffer
781  before calling the real function `" (symbol-name fun-1) "'.\n")  before calling the real function `" (symbol-name fun-1) "'.\n")

Legend:
Removed from v.1.88  
changed lines
  Added in v.1.89

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26