[elpa] externals/svg-tag-mode fe508895e1 08/63: Removed spurious backquote

[ELPA Syncer]

branch: externals/svg-tag-mode
commit fe508895e1f3b0e6a8d066e61c3dbec34cdfa3e1
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Removed spurious backquote
---
 svg-tag-mode.el | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/svg-tag-mode.el b/svg-tag-mode.el
index c5237d6837..f93339be0c 100644
--- a/svg-tag-mode.el
+++ b/svg-tag-mode.el
@@ -98,27 +98,23 @@ This should be zero for most fonts but some fonts may need 
this."
   :type 'integer
   :group 'svg-tag-mode)
 
-
 (defface svg-tag-default-face
   `((t :foreground "white"
        :background "orange"
-       :box `(:line-width 1 :color "orange" :style nil)
+       :box (:line-width 1 :color "orange" :style nil)
        :family ,(face-attribute 'default :family)
        :weight ,(face-attribute 'default :weight)
        :height 120))
   "Default face for tag"
   :group 'svg-tag-mode)
 
-(plist-get (eval (face-attribute 'svg-tag-default-face :box)) :line-width)
-
 (defun svg-tag-make (text &optional face inner-padding outer-padding radius)
   (let* ((face       (or face 'svg-tag-default-face))
          (foreground (face-attribute face :foreground))
          (background (face-attribute face :background))
-         (border     (plist-get (eval (face-attribute face :box)) :color))
-         ;; Line below doesn't work for unknown reason
-         ;; (stroke  (plist-get (eval (face-attribute face :box)) :line-width))
+         (border     (plist-get (face-attribute face :box) :color))
          (stroke     1)
+         ;; (stroke     (plist-get (face-attribute face :box) :line-width))
          (family     (face-attribute face :family))
          (weight     (face-attribute face :weight))
          (size       (/ (face-attribute face :height) 10))