diff options
author | Bastien Guerry <bzg@altern.org> | 2008-02-12 07:10:49 +0000 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2008-02-12 07:10:49 +0000 |
commit | b96817c3877534f85536d9228d057b860efd5f6d (patch) | |
tree | 341d35de8aefe4150066a18883f4bb7bce23bacd /lisp/help.el | |
parent | dd728672b2b464e55cbed45683e81df52d63fe42 (diff) | |
download | emacs-b96817c3877534f85536d9228d057b860efd5f6d.tar.gz |
2008-02-11 Drew Adams <drew.adams@oracle.com>
* help.el (describe-key): Joined some split lines to facilitate
filling.
* help-fns.el (describe-function-1): Fill text of overlong lines.
Diffstat (limited to 'lisp/help.el')
-rw-r--r-- | lisp/help.el | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/help.el b/lisp/help.el index 24f1e74d71a..5260ffc9279 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -745,8 +745,7 @@ temporarily enables it to allow getting help on disabled items and buttons." (with-help-window (help-buffer) (princ (help-key-description key untranslated)) (princ (format "\ -%s runs the command %S - which is " +%s runs the command %S, which is " mouse-msg defn)) (describe-function-1 defn) (when up-event @@ -757,12 +756,11 @@ temporarily enables it to allow getting help on disabled items and buttons." ----------------- up-event %s---------------- -<%S>%s%s runs the command %S - which is " +<%S>%s%s runs the command %S, which is " (if mouse-1-tricky "(short click) " "") ev-type mouse-msg (if mouse-1-remapped - " is remapped to <mouse-2>\nwhich" "") + " is remapped to <mouse-2>, which" "") defn-up)) (describe-function-1 defn-up)) (unless (or (null defn-up-tricky) @@ -773,8 +771,7 @@ temporarily enables it to allow getting help on disabled items and buttons." ----------------- up-event (long click) ---------------- Pressing <%S>%s for longer than %d milli-seconds -runs the command %S - which is " +runs the command %S, which is " ev-type mouse-msg mouse-1-click-follows-link defn-up-tricky)) |