diff options
| author | Juri Linkov <juri@linkov.net> | 2026-05-20 18:41:59 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2026-05-20 18:41:59 +0300 |
| commit | 655302cc21222fe64078cde08eb75eb81bf2da7e (patch) | |
| tree | 1899394a91e451ab26492385870f601e44240f6a | |
| parent | 1754015c6034d65b047d0ada23a406f114d7850d (diff) | |
Fix 'shr-outline-search' (bug#81073)
* lisp/net/shr.el (shr-outline-search):
Don't check for the beginning of the line.
Suggested by Omar Antolín Camarena <omar@im.unam.mx>.
Confirmed by Rahguzar <rahguzar@mailbox.org>.
| -rw-r--r-- | lisp/net/shr.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index 7e47d93d81c..7c556cd88b8 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -2290,8 +2290,7 @@ See `outline-search-function' for BOUND, MOVE, BACKWARD and LOOKING-AT." (bound (or bound (if backward (point-min) (point-max))))) (save-excursion - (when (and (not (bolp)) - (get-text-property (point) 'outline-level)) + (when (get-text-property (point) 'outline-level) (forward-line (if backward -1 1))) (if backward (unless (get-text-property (point) 'outline-level) |