mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-29 19:48:19 +00:00
(tree-widget-value-create): Simplify last change.
This commit is contained in:
parent
c25ae38012
commit
66c20a8203
@ -618,14 +618,7 @@ IGNORE other arguments."
|
||||
(flags (widget-get tree :tree-widget--guide-flags))
|
||||
(indent (widget-get tree :indent))
|
||||
children buttons)
|
||||
(and indent
|
||||
(null flags)
|
||||
(save-restriction
|
||||
(widen)
|
||||
(or (bolp)
|
||||
(and (eq (char-before) ?<)
|
||||
(save-excursion
|
||||
(backward-char) (bolp)))))
|
||||
(and indent (not (widget-get tree :parent))
|
||||
(insert-char ?\ indent))
|
||||
(if (widget-get tree :open)
|
||||
;;;; Unfolded node.
|
||||
|
Loading…
Reference in New Issue
Block a user