diff options
| -rw-r--r-- | lisp/tree-widget.el | 9 |
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. |