X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/e4920bc99dfcee02c3bb83b46a761b0893f76626..ef62b23df5a7007c3d8c74dbca87ba83e9da682e:/lisp/help.el?ds=sidebyside diff --git a/lisp/help.el b/lisp/help.el index 36d49aae9b..2dbb31de97 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -1,7 +1,6 @@ ;;; help.el --- help commands for Emacs -;; Copyright (C) 1985-1986, 1993-1994, 1998-2011 -;; Free Software Foundation, Inc. +;; Copyright (C) 1985-1986, 1993-1994, 1998-2012 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: help, internal @@ -24,7 +23,7 @@ ;;; Commentary: -;; This code implements GNU Emacs' on-line help system, the one invoked by +;; This code implements GNU Emacs's on-line help system, the one invoked by ;; `M-x help-for-help'. ;;; Code: @@ -784,7 +783,10 @@ descriptions of the minor modes, each on a separate page. For this to work correctly for a minor mode, the mode's indicator variable \(listed in `minor-mode-alist') must also be a function -whose documentation describes the minor mode." +whose documentation describes the minor mode. + +If called from Lisp with a non-nil BUFFER argument, display +documentation for the major and minor modes of that buffer." (interactive "@") (unless buffer (setq buffer (current-buffer))) (help-setup-xref (list #'describe-mode buffer) @@ -940,7 +942,7 @@ is currently activated with completion." (error "Cannot find minor mode for `%s'" indicator)))) (defun lookup-minor-mode-from-indicator (indicator) - "Return a minor mode symbol from its indicator on the modeline." + "Return a minor mode symbol from its indicator on the mode line." ;; remove first space if existed (if (and (< 0 (length indicator)) (eq (aref indicator 0) ?\s))