mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00
Code Issues Projects Releases Wiki Activity

Fix previous shr-parse-style change

Browse source 
* lisp/net/shr.el (shr-parse-style): Fix previous clean-up here
(which wasn't well thought through).
This commit is contained in:
Lars Ingebrigtsen 2021-12-06 21:43:39 +01:00
parent 4eb749a173
commit 5a9965f0c7
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/shr.el
View file

@ -1431,9 +1431,7 @@ ones, in case fg and bg are nil."
(defun shr-parse-style (style)
(when style
(save-match-data
(when (string-search "\n" style)
(setq style (replace-match " " t t style))))
(setq style (replace-regexp-in-string "\n" " " style))
(let ((plist nil))
(dolist (elem (split-string style ";"))
(when elem