aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDavid Ponce2005-06-16 05:39:56 +0000
committerDavid Ponce2005-06-16 05:39:56 +0000
commit66c20a8203fa0246961ac0f50dd1b5bfecf587d0 (patch)
tree0f37357aa4b10d50f0aacfec5ba2a6e8128baef7
parentc25ae380129e07c6ed714c030612eabfac680957 (diff)
downloademacs-66c20a8203fa0246961ac0f50dd1b5bfecf587d0.tar.gz
emacs-66c20a8203fa0246961ac0f50dd1b5bfecf587d0.zip
(tree-widget-value-create): Simplify last change.
-rw-r--r--lisp/tree-widget.el9
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/tree-widget.el b/lisp/tree-widget.el
index 448879cea5a..93b466194a1 100644
--- a/lisp/tree-widget.el
+++ b/lisp/tree-widget.el
@@ -618,14 +618,7 @@ IGNORE other arguments."
618 (flags (widget-get tree :tree-widget--guide-flags)) 618 (flags (widget-get tree :tree-widget--guide-flags))
619 (indent (widget-get tree :indent)) 619 (indent (widget-get tree :indent))
620 children buttons) 620 children buttons)
621 (and indent 621 (and indent (not (widget-get tree :parent))
622 (null flags)
623 (save-restriction
624 (widen)
625 (or (bolp)
626 (and (eq (char-before) ?<)
627 (save-excursion
628 (backward-char) (bolp)))))
629 (insert-char ?\ indent)) 622 (insert-char ?\ indent))
630 (if (widget-get tree :open) 623 (if (widget-get tree :open)
631;;;; Unfolded node. 624;;;; Unfolded node.