ui.gadgets.charts.axes: initial import

diff --git a/extra/ui/gadgets/charts/axes/authors.txt b/extra/ui/gadgets/charts/axes/authors.txt
new file mode 100644 (file)
index 0000000..8e1955f
--- /dev/null
+++ b/extra/ui/gadgets/charts/axes/authors.txt
@@ -0,0 +1 @@
+Alexander Ilin

diff --git a/extra/ui/gadgets/charts/axes/axes.factor b/extra/ui/gadgets/charts/axes/axes.factor
new file mode 100644 (file)
index 0000000..34248b9
--- /dev/null
+++ b/extra/ui/gadgets/charts/axes/axes.factor
@@ -0,0 +1,11 @@
+! Copyright (C) 2017 Alexander Ilin.
+! See http://factorcode.org/license.txt for BSD license.
+USING: accessors kernel locals ui.gadgets ui.gadgets.charts
+ui.render ;
+IN: ui.gadgets.charts.axes
+
+TUPLE: axis < gadget vertical? ;
+
+M: axis draw-gadget*
+    dup parent>> dup chart? [| axis chart |
+    ] [ 2drop ] if ;