[elpa] externals/svg-lib f5a94060f2 5/8: Fix when no face-or-style given

[ELPA Syncer]

branch: externals/svg-lib
commit f5a94060f29f020fe103ec006492ed9085200346
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Fix when no face-or-style given
---
 svg-lib.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/svg-lib.el b/svg-lib.el
index 30686b015c..bfcc21798a 100644
--- a/svg-lib.el
+++ b/svg-lib.el
@@ -323,7 +323,7 @@ and additional style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (foreground  (plist-get style :foreground))
          (background  (plist-get style :background))
          (crop-left   (plist-get style :crop-left))
@@ -384,7 +384,7 @@ and additional style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (foreground  (plist-get style :foreground))
          (background  (plist-get style :background))
          (stroke      (plist-get style :stroke))
@@ -438,7 +438,7 @@ and additional style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (foreground  (plist-get style :foreground))
          (background  (plist-get style :background))
          (stroke      (plist-get style :stroke))
@@ -508,7 +508,7 @@ given FACE-OR-STYLE and additional style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (collection  (plist-get style :collection))
          (root (svg-lib--icon-get-data collection icon))
          (foreground  (plist-get style :foreground))
@@ -579,7 +579,7 @@ and additional style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (collection (plist-get style :collection))
          (root (svg-lib--icon-get-data collection icon))         
          (foreground  (plist-get style :foreground))
@@ -682,7 +682,7 @@ given STYLE and style elements ARGS."
                       (face-or-style
                        (apply #'svg-lib-style face-or-style args))
                       (t
-                       svg-lib-style-default)))
+                       (apply #'svg-lib-style svg-lib-style-default args))))
          (foreground  (plist-get style :foreground))
          (background  (plist-get style :background))
          (stroke      (plist-get style :stroke))