From: Chong Yidong Date: Fri, 15 Jun 2007 16:27:23 +0000 (+0000) Subject: (widget-add-documentation-string-button): Fix handling of X-Git-Tag: emacs-pretest-23.0.90~12247 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=511ab56a1ce5a4a2cea73953e755404f0ed32b65;p=emacs.git (widget-add-documentation-string-button): Fix handling of documentation indent. --- diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 6addacee3cb..a69ebdc85e9 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -2956,11 +2956,10 @@ Optional ARGS specifies additional keyword arguments for the (insert-char ?\s indent)) (unless (or (numberp doc-indent) (null doc-indent)) (setq doc-indent 0)) - (setq indent (widget-get widget :documentation-indent)) (widget-put widget :buttons (cons (apply 'widget-create-child-and-convert widget 'documentation-string - :indent indent + :indent doc-indent (nconc args (list doc))) (widget-get widget :buttons))))))