From 511ab56a1ce5a4a2cea73953e755404f0ed32b65 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Fri, 15 Jun 2007 16:27:23 +0000 Subject: [PATCH] (widget-add-documentation-string-button): Fix handling of documentation indent. --- lisp/wid-edit.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) 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)))))) -- 2.39.2