diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/help-at-pt.el | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 159791d880f..e41ee9a19d7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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) * jit-lock.el (jit-lock-stealth-chunk-start): Fix typo in docstring. diff --git a/lisp/help-at-pt.el b/lisp/help-at-pt.el index f297552f870..d8125f3c323 100644 --- a/lisp/help-at-pt.el +++ b/lisp/help-at-pt.el @@ -73,8 +73,8 @@ can also be t, if that is the value of the `kbd-help' property." (defun help-at-pt-kbd-string () "Return the keyboard help string at point. If the `kbd-help' text or overlay property at point produces a -string, return it. Otherwise, use the `help-echo' property. If -this produces no string either, return nil." +string, return it. Otherwise, use the `help-echo' property. +If this produces no string either, return nil." (let ((kbd (help-at-pt-string t)) (echo (help-at-pt-string))) (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 areas with different non-nil help-echo properties are considered different regions. With numeric argument ARG, behaves like -`scan-buf-next-region' with argument -ARG.." +`scan-buf-next-region' with argument -ARG." (interactive "p") (scan-buf-move-to-region 'help-echo (- arg) 'scan-buf-move-hook)) |