changeset 141:15aac5334b64

Started work on replacing nodes with a symbol when a symbol button is clicked
author Mike Pavone <pavone@retrodev.com>
date Fri, 09 Aug 2013 01:36:53 -0700
parents bf8f75b69048
children 833624457b81
files editor.js src/editor.tp
diffstat 2 files changed, 11 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/editor.js	Fri Aug 09 01:35:29 2013 -0700
+++ b/editor.js	Fri Aug 09 01:36:53 2013 -0700
@@ -350,3 +350,8 @@
 		el.webkitRequestFullscreen();
 	}
 }
+
+function create_symbol(name)
+{
+	return new symbol(name);
+}
--- a/src/editor.tp	Fri Aug 09 01:35:29 2013 -0700
+++ b/src/editor.tp	Fri Aug 09 01:36:53 2013 -0700
@@ -13,6 +13,7 @@
 getEl <- foreign: :from idx {}
 setEl <- foreign: :to idx val {}
 goFullScreen <- foreign: {}
+create_symbol <- foreign: :name {}
 
 //TP Parser
 parser <- foreign: #{
@@ -238,10 +239,14 @@
 	event stopPropagation: (foreign: undefined)
 }
 
+replaceNode:with <- :astnode domnode :newnode {
+
+}
+
 lambdaClick <- :domnode astnode event {
 	selectNode: domnode
 	popInscope: ((astnode symbols) allSymbols: (foreign: undefined)) onClick: :key {
-		console log: "foooobar!"
+		replaceNode: astnode domnode with: (create_symbol: key)
 	}
 	inner <- if: ((astnode args) length) > 0 {
 		(astnode args) getEl: 0