diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-06 21:43:39 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-06 21:43:43 +0100 |
| commit | 5a9965f0c720698a44262160983ea089ce67f0d5 (patch) | |
| tree | f74493242dc8c628e341a4afc1acb69f7fb4bb8b /lisp/net/shr.el | |
| parent | 4eb749a17310952af02293d3e55ea3b75660002a (diff) | |
| download | emacs-5a9965f0c720698a44262160983ea089ce67f0d5.tar.gz emacs-5a9965f0c720698a44262160983ea089ce67f0d5.tar.bz2 emacs-5a9965f0c720698a44262160983ea089ce67f0d5.zip | |
Fix previous shr-parse-style change
* lisp/net/shr.el (shr-parse-style): Fix previous clean-up here
(which wasn't well thought through).
Diffstat (limited to 'lisp/net/shr.el')
| -rw-r--r-- | lisp/net/shr.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index 63522b02ace..829cf151f79 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -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 |