summaryrefslogtreecommitdiff
path: root/lisp/net/shr.el
diff options
context:
space:
mode:
authorBasil L. Contovounesios <contovob@tcd.ie>2018-04-17 21:42:04 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2018-04-17 21:42:04 +0200
commit3dfec182d25ed438dc6d4a91f4201e2f7e0c99ec (patch)
tree9ddb618acb52545337b3a3a5e1b82b895560f82d /lisp/net/shr.el
parentc99ba231602a40792317976149500120c4959d1c (diff)
downloademacs-3dfec182d25ed438dc6d4a91f4201e2f7e0c99ec.tar.gz
emacs-3dfec182d25ed438dc6d4a91f4201e2f7e0c99ec.tar.bz2
emacs-3dfec182d25ed438dc6d4a91f4201e2f7e0c99ec.zip
Modernise face specs and set version tags in eww/shr
* lisp/net/shr.el (shr-strike-through, shr-link, shr-selected-link): Set :version tag (bug#31200). * lisp/net/eww.el (eww-form-text, eww-form-textarea): * lisp/net/shr.el (shr-strike-through, shr-link, shr-selected-link): Use (DISPLAY . PLIST) face spec syntax as recommended in '(elisp) Defining Faces'.
Diffstat (limited to 'lisp/net/shr.el')
-rw-r--r--lisp/net/shr.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 0fc7ccf9582..ca70c5c656c 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -135,17 +135,17 @@ cid: URL as the argument.")
(defvar shr-put-image-function 'shr-put-image
"Function called to put image and alt string.")
-(defface shr-strike-through '((t (:strike-through t)))
+(defface shr-strike-through '((t :strike-through t))
"Font for <s> elements."
:group 'shr)
(defface shr-link
- '((t (:inherit link)))
+ '((t :inherit link))
"Font for link elements."
:group 'shr)
(defface shr-selected-link
- '((t (:inherit shr-link :background "red")))
+ '((t :inherit shr-link :background "red"))
"Font for link elements."
:group 'shr)