From: Stefan Monnier Date: Thu, 14 Jul 2005 02:06:30 +0000 (+0000) Subject: Fix up commenting style. X-Git-Tag: emacs-pretest-22.0.90~8163 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d4b4dfc6c224a19009ee0911f383f6fbd9ad37e6;p=emacs.git Fix up commenting style. --- diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 6160391df95..93c34af7a5c 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -217,13 +217,13 @@ ARGLIST can also be t or a string of the form \"(FUN ARG1 ARG2 ...)\"." (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 @@ BUFFER should be a buffer or a buffer name." (provide 'help-fns) -;;; arch-tag: 9e10331c-ae81-4d13-965d-c4819aaab0b3 +;; arch-tag: 9e10331c-ae81-4d13-965d-c4819aaab0b3 ;;; help-fns.el ends here