master d0d9d7f5fa3 4/6: Optionally turn on visual-line-mode + outline support

[Eli Zaretskii]

branch: master
commit d0d9d7f5fa3b306ac66a3b529e337eb3623a475b
Author: Rahguzar <rahguzar@zohomail.eu>
Commit: Eli Zaretskii <eliz@gnu.org>

    Optionally turn on visual-line-mode + outline support
    
    * lisp/net/eww.el (eww-render): Turn on 'visual-line-mode'
    in absence of filling.
    (eww-mode): Set 'outline-regexp' and 'outline-level'.
    (Bug#66676)
---
 lisp/net/eww.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index d8a66b2ce32..77bb6be2904 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -657,6 +657,8 @@ The renaming scheme is performed in accordance with
              (setq eww-history-position 0)
              (and last-coding-system-used
                   (set-buffer-file-coding-system last-coding-system-used))
+              (unless shr-fill-text
+                (visual-line-mode))
              (run-hooks 'eww-after-render-hook)
               ;; Enable undo again so that undo works in text input
               ;; boxes.
@@ -1217,6 +1219,8 @@ the like."
   (setq-local shr-url-transformer #'eww--transform-url)
   ;; Also rescale images when rescaling the text.
   (add-hook 'text-scale-mode-hook #'eww--rescale-images nil t)
+  (setq-local outline-search-function 'shr-outline-search
+              outline-level 'shr-outline-level)
   (setq buffer-read-only t))
 
 (defvar text-scale-mode)