emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/svg-clock 55d2f18 17/18: Revert "Copy svg--def to manip


From: Stefan Monnier
Subject: [elpa] externals/svg-clock 55d2f18 17/18: Revert "Copy svg--def to manipulate the DOM directly from svg-clock.el"
Date: Tue, 1 Dec 2020 17:26:04 -0500 (EST)

branch: externals/svg-clock
commit 55d2f18115675b3ffd9ad41cc01606a12cdccdfb
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Revert "Copy svg--def to manipulate the DOM directly from svg-clock.el"
    
    This reverts commit 1f7c74037d3adadc86c72c9736308a24107ad964.
    
    This had already been fixed in almost the same way.
---
 svg-clock.el | 13 ++-----------
 1 file changed, 2 insertions(+), 11 deletions(-)

diff --git a/svg-clock.el b/svg-clock.el
index c99de15..454c66b 100644
--- a/svg-clock.el
+++ b/svg-clock.el
@@ -117,15 +117,6 @@ and `hour-hand'.  The clock-face has a size of 1x1."
                                                      'rotate angle .5 .5)))
                                   (number-sequence 0 354 6)))))))
 
-(defun svg-clock--def (svg def)
-  (dom-append-child
-   (or (dom-by-tag svg 'defs)
-       (let ((node (dom-node 'defs)))
-        (dom-add-child-before svg node)
-        node))
-   def)
-  svg)
-
 (defun svg-clock--create-svg (time size foreground background
                                   no-seconds no-face)
   "Return an SVG element displaying an analog clock.
@@ -156,8 +147,8 @@ its colors are FOREGROUND and BACKGROUND."
                                     'rotate
                                     (+ (* hours 30) (/ minutes 2.0))
                                    .5 .5))))))
-    (dolist (def defs) (svg-clock--def svg def))
-    (svg-clock--def svg clock)
+    (dolist (def defs) (svg-clock-def svg def))
+    (svg-clock-def svg clock)
     (dom-append-child svg
                       (svg-clock-use 'clock
                                      (svg-clock-transform 'scale size size)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]