# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1181924843 0
# Node ID 8429053c449654e031219d86cfa81d777dc0a32e
# Parent  a71b6149e34798171c71971b96a0fe9d7ddd2f27
(widget-add-documentation-string-button): Fix handling of
documentation indent.

diff -r a71b6149e347 -r 8429053c4496 lisp/wid-edit.el
--- a/lisp/wid-edit.el	Fri Jun 15 16:27:16 2007 +0000
+++ b/lisp/wid-edit.el	Fri Jun 15 16:27:23 2007 +0000
@@ -2956,11 +2956,10 @@
 	   (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))))))