branch: externals/sketch-mode
commit 6433b20da7a98f8eec597d86f57be61a562da393
Author: Daniel Nicolai <dalanico...@gmail.com>
Commit: Daniel Nicolai <dalanico...@gmail.com>
Add circle/ellipse labels
---
sketch-mode.el | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/sketch-mode.el b/sketch-mode.el
index 9987caa..62900ac 100644
--- a/sketch-mode.el
+++ b/sketch-mode.el
@@ -552,7 +552,14 @@ values"
:y (dom-attr node 'y1)
:font-size 20
:stroke "red"
- :fill "red"))))
+ :fill "red"))
+ ((or 'circle 'ellipse) (svg-text svg-labels
+ (dom-attr node 'id)
+ :x (dom-attr node 'cx)
+ :y (dom-attr node 'cy)
+ :font-size 20
+ :stroke "red"
+ :fill "red"))))
nodes)
svg-labels))
