changeset 81444:8429053c4496

(widget-add-documentation-string-button): Fix handling of documentation indent.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 15 Jun 2007 16:27:23 +0000
parents a71b6149e347
children 4d58251a76e1
files lisp/wid-edit.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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))))))