* package.el (describe-package): Use symbol-at-point as additional guess
This commit is contained in:
parent
a4760a347e
commit
6689b537c8
1 changed files with 2 additions and 1 deletions
|
@ -2104,7 +2104,8 @@ will be deleted."
|
||||||
(defun describe-package (package)
|
(defun describe-package (package)
|
||||||
"Display the full documentation of PACKAGE (a symbol)."
|
"Display the full documentation of PACKAGE (a symbol)."
|
||||||
(interactive
|
(interactive
|
||||||
(let* ((guess (function-called-at-point)))
|
(let* ((guess (or (function-called-at-point)
|
||||||
|
(symbol-at-point))))
|
||||||
(require 'finder-inf nil t)
|
(require 'finder-inf nil t)
|
||||||
;; Load the package list if necessary (but don't activate them).
|
;; Load the package list if necessary (but don't activate them).
|
||||||
(unless package--initialized
|
(unless package--initialized
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue