procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* vc-dir.el (vc-dir-menu-map, vc-dir-at-event, vc-dir-resynch-file):

Browse source 
Fix typos in docstrings.
This commit is contained in:
Juanma Barranquero 2009-01-29 12:34:08 +00:00
parent 6570a1c427
commit 426bf35900
2 changed files with 10 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2009-01-29 Juanma Barranquero <lekktu@gmail.com>
* vc-dir.el (vc-dir-menu-map, vc-dir-at-event, vc-dir-resynch-file):
Fix typos in docstrings.
2009-01-29 Juanma Barranquero <lekktu@gmail.com>
* bindings.el (completion-ignored-extensions):
@ -9,7 +14,7 @@
2009-01-29 Klaus Straubinger <KSNetz@UseNet.ArcorNews.DE> (tiny change)
* pcmpl-rpm.el (pcmpl-rpm): Doc fix.
* pcmpl-rpm.el (pcmpl-rpm): Doc fix. (Bug#2094)
2009-01-29 Glenn Morris <rgm@gnu.org>

8
lisp/vc-dir.el
View file

@ -206,7 +206,7 @@ See `run-hooks'."
'(menu-item "Register" vc-register
:help "Register file set into the version control system"))
map)
"Menu for VC dir")
"Menu for VC dir.")
;; VC backends can use this to add mode-specific menu items to
;; vc-dir-menu-map.
@ -276,8 +276,8 @@ See `run-hooks'."
"Keymap for directory buffer.")
(defmacro vc-dir-at-event (event &rest body)
"Evaluate `body' with point located at event-start of `event'.
If `body' uses `event', it should be a variable,
"Evaluate BODY with point located at event-start of EVENT.
If BODY uses EVENT, it should be a variable,
otherwise it will be evaluated twice."
(let ((posn (make-symbol "vc-dir-at-event-posn")))
`(save-excursion
@ -850,7 +850,7 @@ If it is a file, return the corresponding cons for the file itself."
(vc-dir-update fileentries (current-buffer)))))
(defun vc-dir-resynch-file (&optional fname)
"Update the entries for FILE in any directory buffers that list it."
"Update the entries for FNAME in any directory buffers that list it."
(let ((file (or fname (expand-file-name buffer-file-name)))
(found-vc-dir-buf nil))
(save-excursion