aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2007-06-15 16:27:23 +0000
committerChong Yidong2007-06-15 16:27:23 +0000
commit511ab56a1ce5a4a2cea73953e755404f0ed32b65 (patch)
treec8a0ddb4d8ff46b3f2c2e6e13497026dd13dff49
parent1f0abf8fd2220cb04f59201587532c0725692bb8 (diff)
downloademacs-511ab56a1ce5a4a2cea73953e755404f0ed32b65.tar.gz
emacs-511ab56a1ce5a4a2cea73953e755404f0ed32b65.zip
(widget-add-documentation-string-button): Fix handling of
documentation indent.
-rw-r--r--lisp/wid-edit.el3
1 files changed, 1 insertions, 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
2956 (insert-char ?\s indent)) 2956 (insert-char ?\s indent))
2957 (unless (or (numberp doc-indent) (null doc-indent)) 2957 (unless (or (numberp doc-indent) (null doc-indent))
2958 (setq doc-indent 0)) 2958 (setq doc-indent 0))
2959 (setq indent (widget-get widget :documentation-indent))
2960 (widget-put widget :buttons 2959 (widget-put widget :buttons
2961 (cons (apply 'widget-create-child-and-convert 2960 (cons (apply 'widget-create-child-and-convert
2962 widget 'documentation-string 2961 widget 'documentation-string
2963 :indent indent 2962 :indent doc-indent
2964 (nconc args (list doc))) 2963 (nconc args (list doc)))
2965 (widget-get widget :buttons)))))) 2964 (widget-get widget :buttons))))))
2966 2965