summaryrefslogtreecommitdiff
path: root/blocks.js
diff options
context:
space:
mode:
authorjmoenig <jens@moenig.org>2013-06-21 09:53:16 +0200
committerjmoenig <jens@moenig.org>2013-06-21 09:53:16 +0200
commit1f8f6e01929b2d3c3e4db8251adedc24ad1935ba (patch)
treebceba37d420a00828d38e9f2ab8985466ae7ab2c /blocks.js
parent25ea3d4a16696989824df9994f4024ba5aebc7ca (diff)
downloadsnap-byow-1f8f6e01929b2d3c3e4db8251adedc24ad1935ba.tar.gz
snap-byow-1f8f6e01929b2d3c3e4db8251adedc24ad1935ba.zip
%code input slot
multi-line, monospaced, type-in slot for code mappings
Diffstat (limited to 'blocks.js')
-rw-r--r--blocks.js7
1 files changed, 7 insertions, 0 deletions
diff --git a/blocks.js b/blocks.js
index 34317bb..16c427c 100644
--- a/blocks.js
+++ b/blocks.js
@@ -728,6 +728,12 @@ SyntaxElementMorph.prototype.labelPart = function (spec) {
part = new TextSlotMorph();
part.fixLayout();
break;
+ case '%code':
+ part = new TextSlotMorph();
+ part.contents().fontName = 'monospace';
+ part.contents().fontStyle = 'monospace';
+ part.fixLayout();
+ break;
case '%obj':
part = new ArgMorph('object');
break;
@@ -1597,6 +1603,7 @@ SyntaxElementMorph.prototype.endLayout = function () {
%s - white rectangular type-in slot ("string-type")
%txt - white rectangular type-in slot ("text-type")
%mlt - white rectangular type-in slot ("multi-line-text-type")
+ %code - white rectangular type-in slot, monospaced font
%n - white roundish type-in slot ("numerical")
%dir - white roundish type-in slot with drop-down for directions
%inst - white roundish type-in slot with drop-down for instruments