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

* help-at-pt.el (help-at-pt-kbd-string): Reflow docstring.

Browse source 
(scan-buf-previous-region): Fix typo in docstring.
This commit is contained in:
Juanma Barranquero 2009-04-14 21:54:49 +00:00
parent 6dea717381
commit ade29c44f6
2 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2009-04-14 Juanma Barranquero <lekktu@gmail.com>
* help-at-pt.el (help-at-pt-kbd-string): Reflow docstring.
(scan-buf-previous-region): Fix typo in docstring.
2009-04-14 Edward Wiebe <usenet@pusto.de> (tiny change) 2009-04-14 Edward Wiebe <usenet@pusto.de> (tiny change)
* jit-lock.el (jit-lock-stealth-chunk-start): Fix typo in docstring. * jit-lock.el (jit-lock-stealth-chunk-start): Fix typo in docstring.

6
lisp/help-at-pt.el
View file

@ -73,8 +73,8 @@ can also be t, if that is the value of the `kbd-help' property."
(defun help-at-pt-kbd-string () (defun help-at-pt-kbd-string ()
"Return the keyboard help string at point. "Return the keyboard help string at point.
If the `kbd-help' text or overlay property at point produces a If the `kbd-help' text or overlay property at point produces a
string, return it. Otherwise, use the `help-echo' property. If string, return it. Otherwise, use the `help-echo' property.
this produces no string either, return nil." If this produces no string either, return nil."
(let ((kbd (help-at-pt-string t)) (let ((kbd (help-at-pt-string t))
(echo (help-at-pt-string))) (echo (help-at-pt-string)))
(if (and kbd (not (eq kbd t))) kbd echo))) (if (and kbd (not (eq kbd t))) kbd echo)))
@ -344,7 +344,7 @@ rarely happens in practice."
Print the help found there using `display-local-help'. Adjacent Print the help found there using `display-local-help'. Adjacent
areas with different non-nil help-echo properties are considered areas with different non-nil help-echo properties are considered
different regions. With numeric argument ARG, behaves like different regions. With numeric argument ARG, behaves like
`scan-buf-next-region' with argument -ARG.." `scan-buf-next-region' with argument -ARG."
(interactive "p") (interactive "p")
(scan-buf-move-to-region 'help-echo (- arg) 'scan-buf-move-hook)) (scan-buf-move-to-region 'help-echo (- arg) 'scan-buf-move-hook))