summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
authorJohn Paul Wallington <jpw@pobox.com>2005-11-30 00:55:12 +0000
committerJohn Paul Wallington <jpw@pobox.com>2005-11-30 00:55:12 +0000
commit24374f5a1dafd5be4fdd2eb32f338516c6836459 (patch)
tree988a50a27822f72f15b71547f7fd697f27ea9d17 /lisp/help-fns.el
parentde7124a7bda8ceeaf502775849f7aabf3a97c2be (diff)
downloademacs-24374f5a1dafd5be4fdd2eb32f338516c6836459.tar.gz
(describe-function-1): Fill arglist.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 6e1bd62d04b..c3bff927300 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -436,7 +436,9 @@ face (according to `face-differs-from-default-p')."
(format "\nMacro: %s" (format-kbd-macro def)))
(t "[Missing arglist. Please make a bug report.]")))
(high (help-highlight-arguments use doc)))
- (insert (car high) "\n")
+ (let ((fill-begin (point)))
+ (insert (car high) "\n")
+ (fill-region fill-begin (point)))
(setq doc (cdr high))))
(let ((obsolete (and
;; function might be a lambda construct.