Re-fix previous Info-fontify-node change

* lisp/info.el (Info-fontify-node): Re-fix previous fix here
(bug#34661) by fixing an off-by-one error in the `looking-back'.
This commit is contained in:
Lars Ingebrigtsen 2021-03-11 17:50:02 +01:00
parent 65441a6fab
commit 27b8638409

View file

@ -4797,10 +4797,10 @@ first line or header line, and for breadcrumb links.")
(skip-syntax-backward " ("))
(setq other-tag
(cond ((save-match-data (looking-back "\\(^\\| \\)see"
(- (point) 3)))
(- (point) 4)))
"")
((save-match-data (looking-back "\\(^\\| \\)in"
(- (point) 2)))
(- (point) 3)))
"")
((memq (char-before) '(nil ?\. ?! ??))
"See ")