Mercurial > emacs
changeset 64304:4ca52e899ec6
Fix up commenting style.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 14 Jul 2005 02:06:30 +0000 |
| parents | e2e79eb7ab71 |
| children | d533a2de8243 |
| files | lisp/help-fns.el |
| diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help-fns.el Thu Jul 14 01:19:10 2005 +0000 +++ b/lisp/help-fns.el Thu Jul 14 02:06:30 2005 +0000 @@ -217,13 +217,13 @@ (intern (upcase name)))))) arglist))) -;;; Could be this, if we make symbol-file do the work below. -;;; (defun help-C-file-name (subr-or-var kind) -;;; "Return the name of the C file where SUBR-OR-VAR is defined. -;;; KIND should be `var' for a variable or `subr' for a subroutine." -;;; (symbol-file (if (symbolp subr-or-var) subr-or-var -;;; (subr-name subr-or-var)) -;;; (if (eq kind 'var) 'defvar 'defun))) +;; Could be this, if we make symbol-file do the work below. +;; (defun help-C-file-name (subr-or-var kind) +;; "Return the name of the C file where SUBR-OR-VAR is defined. +;; KIND should be `var' for a variable or `subr' for a subroutine." +;; (symbol-file (if (symbolp subr-or-var) subr-or-var +;; (subr-name subr-or-var)) +;; (if (eq kind 'var) 'defvar 'defun))) ;;;###autoload (defun help-C-file-name (subr-or-var kind) "Return the name of the C file where SUBR-OR-VAR is defined. @@ -715,5 +715,5 @@ (provide 'help-fns) -;;; arch-tag: 9e10331c-ae81-4d13-965d-c4819aaab0b3 +;; arch-tag: 9e10331c-ae81-4d13-965d-c4819aaab0b3 ;;; help-fns.el ends here