mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-04 11:40:22 +00:00
(bookmark-file-or-variation-thereof): Doc fix.
This commit is contained in:
parent
dd33e6e94b
commit
99d30b0c06
@ -1072,8 +1072,9 @@ of the old one in the permanent bookmark record."
|
||||
|
||||
|
||||
(defun bookmark-file-or-variation-thereof (file)
|
||||
"Return FILE if it exists, or return the first variation based on
|
||||
`Info-suffix-list' that exists, else return nil."
|
||||
"Return FILE (a string) or a reasonable variation that exists, else nil.
|
||||
Reasonable variations of the name are made by appending suffixes defined
|
||||
in `Info-suffix-list'."
|
||||
(if (file-exists-p file)
|
||||
file
|
||||
(require 'info) ; ensure Info-suffix-list is bound
|
||||
@ -1085,7 +1086,6 @@ of the old one in the permanent bookmark record."
|
||||
Info-suffix-list)
|
||||
nil)))
|
||||
|
||||
|
||||
(defun bookmark-jump-noselect (str)
|
||||
;; a leetle helper for bookmark-jump :-)
|
||||
;; returns (BUFFER . POINT)
|
||||
|
Loading…
Reference in New Issue
Block a user