mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-20 18:17:20 +00:00
Doc fixes.
(bookmark-relocate): Rename arg.
This commit is contained in:
parent
42a49b29f4
commit
cdf2fffe38
@ -179,7 +179,7 @@ through a file easier.")
|
|||||||
|
|
||||||
(defvar bookmark-save-flag t
|
(defvar bookmark-save-flag t
|
||||||
"*Controls when Emacs saves bookmarks to a file.
|
"*Controls when Emacs saves bookmarks to a file.
|
||||||
--> Nil means never save bookmarks, except when `bookmark-save' is
|
--> nil means never save bookmarks, except when `bookmark-save' is
|
||||||
explicitly called \(\\[bookmark-save]\).
|
explicitly called \(\\[bookmark-save]\).
|
||||||
--> t means save bookmarks when Emacs is killed.
|
--> t means save bookmarks when Emacs is killed.
|
||||||
--> Otherise, it should be a number that is the frequency with which
|
--> Otherise, it should be a number that is the frequency with which
|
||||||
@ -202,18 +202,18 @@ bookmark-file, which is `~/.emacs-bkmrks' by default.")
|
|||||||
"*File in which to save bookmarks by default.")
|
"*File in which to save bookmarks by default.")
|
||||||
|
|
||||||
(defvar bookmark-version-control 'nospecial
|
(defvar bookmark-version-control 'nospecial
|
||||||
"This variable controls whether or not to make numbered backups of
|
"Control whether to make numbered backups of the master bookmark file.
|
||||||
the master bookmark file. It can have four values: t, nil, never, and
|
This variable can have four values: t, nil, `never', and `nospecial'.
|
||||||
nospecial. The first three have the same meaning that they do for the
|
The first three have the same meaning that they do for the
|
||||||
variable version-control, and the final value nospecial means just use
|
variable `version-control'.
|
||||||
the value of version-control.")
|
The value `nospecial' means just use the value of `version-control'.")
|
||||||
|
|
||||||
(defvar bookmark-completion-ignore-case t
|
(defvar bookmark-completion-ignore-case t
|
||||||
"*Non-nil means bookmark functions ignore case in completion.")
|
"*Non-nil means bookmark functions ignore case in completion.")
|
||||||
|
|
||||||
(defvar bookmark-sort-flag t
|
(defvar bookmark-sort-flag t
|
||||||
"*Non-nil means that bookmarks will be displayed sorted by bookmark
|
"*Non-nil means display bookmarks sorted by name.
|
||||||
name. Otherwise they will be displayed in LIFO order (that is, most
|
Otherwise they are displayed in LIFO order (that is, most
|
||||||
recently set ones come first, oldest ones come last).")
|
recently set ones come first, oldest ones come last).")
|
||||||
|
|
||||||
(defvar bookmark-search-size 500
|
(defvar bookmark-search-size 500
|
||||||
@ -225,7 +225,7 @@ recently set ones come first, oldest ones come last).")
|
|||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun bookmark-set (&optional parg)
|
(defun bookmark-set (&optional parg)
|
||||||
"Set a bookmark named NAME inside a file.
|
"Set a bookmark named NAME inside the visited file.
|
||||||
With prefix arg, will not overwrite a bookmark that has the same name
|
With prefix arg, will not overwrite a bookmark that has the same name
|
||||||
as NAME if such a bookmark already exists, but instead will \"push\"
|
as NAME if such a bookmark already exists, but instead will \"push\"
|
||||||
the new bookmark onto the bookmark alist. Thus the most recently set
|
the new bookmark onto the bookmark alist. Thus the most recently set
|
||||||
@ -237,7 +237,7 @@ To yank words from the text of the buffer and use them as part of the
|
|||||||
bookmark name, type C-w while setting a bookmark. Successive C-w's
|
bookmark name, type C-w while setting a bookmark. Successive C-w's
|
||||||
yank successive words.
|
yank successive words.
|
||||||
|
|
||||||
Typing C-v inserts the name of the current file being visited. Typing
|
Typing C-v inserts the name of the current file being visited. Typing
|
||||||
C-u inserts the name of the last bookmark used in the buffer \(as an
|
C-u inserts the name of the last bookmark used in the buffer \(as an
|
||||||
aid in using a single bookmark name to track your progress through a
|
aid in using a single bookmark name to track your progress through a
|
||||||
large file\). If no bookmark was used, then C-u behaves like C-v and
|
large file\). If no bookmark was used, then C-u behaves like C-v and
|
||||||
@ -388,10 +388,9 @@ You may have a problem using this function if the value of variable
|
|||||||
bookmarks. See help on function `bookmark-load' for more about
|
bookmarks. See help on function `bookmark-load' for more about
|
||||||
this.
|
this.
|
||||||
|
|
||||||
If the file pointed to by BOOKMARK no longer exists, you will be asked
|
If the file pointed to by BOOKMARK no longer exists, `bookmark-jump'
|
||||||
if you wish to give the bookmark a new location, and bookmark-jump
|
asks you to specify a different file to use instead. If you specify
|
||||||
will then jump to the new location, as well as recording it in place
|
one, it also updates BOOKMARK to refer to that file."
|
||||||
of the old one in the permanent bookmark record."
|
|
||||||
(interactive (progn (bookmark-try-default-file)
|
(interactive (progn (bookmark-try-default-file)
|
||||||
(let* ((completion-ignore-case
|
(let* ((completion-ignore-case
|
||||||
bookmark-completion-ignore-case)
|
bookmark-completion-ignore-case)
|
||||||
@ -476,11 +475,11 @@ of the old one in the permanent bookmark record."
|
|||||||
nil))))))
|
nil))))))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun bookmark-relocate (str)
|
(defun bookmark-relocate (bookmark)
|
||||||
"Relocate BOOKMARK -- prompts for a filename, and makes an already
|
"Relocate bookmark BOOKMARK.
|
||||||
existing bookmark point to that file, instead of the one it used to
|
Prompt for a filename, and makes the bookmark BOOKMARK point to that
|
||||||
point at. Useful when a file has been renamed after a bookmark was
|
file, instead of the one it used to point at. Useful when a file has
|
||||||
set in it."
|
been renamed after a bookmark was set in it."
|
||||||
(interactive (let ((completion-ignore-case
|
(interactive (let ((completion-ignore-case
|
||||||
bookmark-completion-ignore-case))
|
bookmark-completion-ignore-case))
|
||||||
(progn (bookmark-try-default-file)
|
(progn (bookmark-try-default-file)
|
||||||
@ -489,11 +488,11 @@ set in it."
|
|||||||
bookmark-alist
|
bookmark-alist
|
||||||
nil
|
nil
|
||||||
0)))))
|
0)))))
|
||||||
(let* ((bmrk (assoc str bookmark-alist))
|
(let* ((bmrk (assoc bookmark bookmark-alist))
|
||||||
(bmrk-filename (car (car (cdr bmrk))))
|
(bmrk-filename (car (car (cdr bmrk))))
|
||||||
(newloc (expand-file-name
|
(newloc (expand-file-name
|
||||||
(read-file-name
|
(read-file-name
|
||||||
(format "Relocate %s to: " str)
|
(format "Relocate %s to: " bookmark)
|
||||||
(file-name-directory bmrk-filename)))))
|
(file-name-directory bmrk-filename)))))
|
||||||
(setcar (car (cdr bmrk)) newloc)))
|
(setcar (car (cdr bmrk)) newloc)))
|
||||||
|
|
||||||
@ -632,9 +631,8 @@ one most recently used in this file, if any\)."
|
|||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun bookmark-write ()
|
(defun bookmark-write ()
|
||||||
"Write bookmarks to a file \(for which the user will be prompted
|
"Write bookmarks to a specified file.
|
||||||
interactively\). Don't use this in Lisp programs; use bookmark-save
|
Don't use this in Lisp programs; use `bookmark-save' instead."
|
||||||
instead."
|
|
||||||
(interactive)
|
(interactive)
|
||||||
(bookmark-try-default-file)
|
(bookmark-try-default-file)
|
||||||
(bookmark-save t))
|
(bookmark-save t))
|
||||||
@ -811,8 +809,8 @@ following in your .emacs:
|
|||||||
(defun list-bookmarks ()
|
(defun list-bookmarks ()
|
||||||
"Display a list of existing bookmarks.
|
"Display a list of existing bookmarks.
|
||||||
The list is displayed in a buffer named `*Bookmark List*'.
|
The list is displayed in a buffer named `*Bookmark List*'.
|
||||||
The leftmost column displays a D if the bookmark is flagged for
|
The leftmost column displays a `D' if the bookmark is flagged for
|
||||||
deletion, or > if it is flagged for displaying."
|
deletion, or `>' if it is flagged for displaying."
|
||||||
(interactive)
|
(interactive)
|
||||||
(bookmark-try-default-file)
|
(bookmark-try-default-file)
|
||||||
(switch-to-buffer (get-buffer-create "*Bookmark List*"))
|
(switch-to-buffer (get-buffer-create "*Bookmark List*"))
|
||||||
@ -839,7 +837,7 @@ Letters do not insert themselves; instead, they are commands.
|
|||||||
\\<Bookmark-menu-mode-map>
|
\\<Bookmark-menu-mode-map>
|
||||||
\\[Bookmark-menu-mark] -- mark bookmark to be displayed.
|
\\[Bookmark-menu-mark] -- mark bookmark to be displayed.
|
||||||
\\[Bookmark-menu-select] -- select bookmark of line point is on.
|
\\[Bookmark-menu-select] -- select bookmark of line point is on.
|
||||||
Also show bookmarks marked using m in other windows.
|
Also show bookmarks marked using `m' in other windows.
|
||||||
\\[Bookmark-menu-toggle-filenames] -- toggle displaying of filenames (they may obscure long bookmark names).
|
\\[Bookmark-menu-toggle-filenames] -- toggle displaying of filenames (they may obscure long bookmark names).
|
||||||
\\[Bookmark-menu-locate] -- display (in minibuffer) location of this bookmark.
|
\\[Bookmark-menu-locate] -- display (in minibuffer) location of this bookmark.
|
||||||
\\[Bookmark-menu-1-window] -- select this bookmark in full-frame window.
|
\\[Bookmark-menu-1-window] -- select this bookmark in full-frame window.
|
||||||
@ -1110,8 +1108,8 @@ Optional ARG means move up."
|
|||||||
(forward-line 1))))
|
(forward-line 1))))
|
||||||
|
|
||||||
(defun Bookmark-menu-delete-backwards ()
|
(defun Bookmark-menu-delete-backwards ()
|
||||||
"Mark bookmark on this line to be deleted by \\<Bookmark-menu-mode-map>\\[Bookmark-menu-execute] command
|
"Mark bookmark on this line to be deleted by \\<Bookmark-menu-mode-map>\\[Bookmark-menu-execute] command.
|
||||||
and then move up one line"
|
Then move up one line"
|
||||||
(interactive)
|
(interactive)
|
||||||
(Bookmark-menu-delete)
|
(Bookmark-menu-delete)
|
||||||
(forward-line -2)
|
(forward-line -2)
|
||||||
@ -1215,7 +1213,7 @@ this."
|
|||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun bookmark-menu-bar-locate (event)
|
(defun bookmark-menu-bar-locate (event)
|
||||||
"Insert the name of the file associated with BOOKMARK.
|
"Insert the name of the file associated with BOOKMARK.
|
||||||
\(This is not the same as the contents of that file\)."
|
\(This is not the same as the contents of that file\)."
|
||||||
(interactive "e")
|
(interactive "e")
|
||||||
(bookmark-make-menu-bar-with-function 'bookmark-locate
|
(bookmark-make-menu-bar-with-function 'bookmark-locate
|
||||||
|
Loading…
Reference in New Issue
Block a user