Credit card icon

unisonweb · Feb 5, 2024 · 059f491 · 059f491
1 parent 5285ccb
commit 059f491
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 3 deletions.
diff --git a/src/Lib/TreePath.elm b/src/Lib/TreePath.elm
@@ -3,9 +3,10 @@
   TreePath
   ========
     
-  Simple type for keeping tracking of a path down a tree of variants that
-  could have lists as data. Definition.Doc is the main example of a tree
-  structure that uses TreePath.
+  Simple type for keeping tracking of a path down a tree of variants that could
+  have lists as data. Definition.Doc is the main example of a tree structure
+  that uses TreePath. Definition.Doc uses TreePath for tracking if sub trees of
+  a Doc is folded or not.
 
 --}
 

diff --git a/src/UI/Icon.elm b/src/UI/Icon.elm
@@ -961,3 +961,13 @@ profile =
         []
         [ path [ fill "currentColor", fillRule "evenodd", d "M10.8 1H4.2C3.59249 1 3.1 1.44772 3.1 2V2.7C3.1 3.00376 2.85376 3.25 2.55 3.25C2.24624 3.25 2 3.00376 2 2.7V2C2 0.89543 2.98497 0 4.2 0H10.8C12.015 0 13 0.895431 13 2V12C13 13.1046 12.015 14 10.8 14H4.2C2.98497 14 2 13.1046 2 12V11.3C2 10.9962 2.24624 10.75 2.55 10.75C2.85376 10.75 3.1 10.9962 3.1 11.3V12C3.1 12.5523 3.59249 13 4.2 13H10.8C11.4075 13 11.9 12.5523 11.9 12V2C11.9 1.44772 11.4075 1 10.8 1ZM1 5C1 4.72386 1.22386 4.5 1.5 4.5H3C3.27614 4.5 3.5 4.72386 3.5 5C3.5 5.27614 3.27614 5.5 3 5.5H1.5C1.22386 5.5 1 5.27614 1 5ZM1.5 6.5C1.22386 6.5 1 6.72386 1 7C1 7.27614 1.22386 7.5 1.5 7.5H3C3.27614 7.5 3.5 7.27614 3.5 7C3.5 6.72386 3.27614 6.5 3 6.5H1.5ZM1 9C1 8.72386 1.22386 8.5 1.5 8.5H3C3.27614 8.5 3.5 8.72386 3.5 9C3.5 9.27614 3.27614 9.5 3 9.5H1.5C1.22386 9.5 1 9.27614 1 9ZM8.33744 4.55102C8.33744 5.01314 7.96282 5.38775 7.5007 5.38775C7.03859 5.38775 6.66397 5.01314 6.66397 4.55102C6.66397 4.0889 7.03859 3.71429 7.5007 3.71429C7.96282 3.71429 8.33744 4.0889 8.33744 4.55102ZM7.5007 7C7.13123 7 6.7745 7.06364 6.43812 7.18203C5.47408 7.52134 4.67721 8.31037 4.22674 9.34005C3.78401 10.352 4.72267 11.2857 5.82724 11.2857H9.17417C10.2787 11.2857 11.2174 10.352 10.7747 9.34005C10.3242 8.31037 9.52733 7.52134 8.56329 7.18203C8.22691 7.06364 7.87018 7 7.5007 7ZM7.5007 6.38775C7.14547 6.38775 6.8138 6.28691 6.53274 6.11229C6.01121 5.78826 5.66397 5.21019 5.66397 4.55102C5.66397 3.53662 6.4863 2.71429 7.5007 2.71429C8.51511 2.71429 9.33744 3.53662 9.33744 4.55102C9.33744 5.21019 8.9902 5.78826 8.46867 6.11229C8.18761 6.28691 7.85593 6.38775 7.5007 6.38775ZM5.1429 9.74086C5.62514 8.63857 6.54771 8 7.5007 8C8.4537 8 9.37627 8.63857 9.85851 9.74086C9.89137 9.81596 9.88869 9.86067 9.88375 9.88709C9.87774 9.91922 9.85861 9.96975 9.80463 10.031C9.68847 10.1627 9.45714 10.2857 9.17417 10.2857H5.82724C5.54427 10.2857 5.31294 10.1627 5.19678 10.031C5.1428 9.96975 5.12367 9.91922 5.11766 9.88709C5.11271 9.86067 5.11004 9.81596 5.1429 9.74086Z" ] []
         ]
+
+
+creditCard : Icon msg
+creditCard =
+    Icon "credit-card"
+        []
+        [ path [ fill "currentColor", fillRule "evenodd", d "M12.8333 9L12.8333 5V3C12.8333 2.44772 12.311 2 11.6667 2L2.33333 2C1.689 2 1.16667 2.44772 1.16667 3L1.16667 5L1.16667 9C1.16667 9.55229 1.689 10 2.33333 10H11.6667C12.311 10 12.8333 9.55229 12.8333 9ZM14 3C14 1.89543 12.9553 1 11.6667 1L2.33333 1C1.04467 1 3.10551e-07 1.89543 2.62268e-07 3L0 9C-4.82822e-08 10.1046 1.04467 11 2.33333 11H11.6667C12.9553 11 14 10.1046 14 9V3Z" ] []
+        , path [ fill "currentColor", d "M12.8333 4V5L1.16667 5L1.16667 4L12.8333 4Z" ] []
+        , path [ fill "currentColor", d "M2 7.5C2 6.94772 2.44772 6.5 3 6.5H4C4.55229 6.5 5 6.94772 5 7.5C5 8.05229 4.55229 8.5 4 8.5H3C2.44772 8.5 2 8.05229 2 7.5Z" ] []
+        ]