# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1366268215 25200
# Node ID d5dc9507d612b52887b82473512b969711384bee
# Parent  77f7cd65e1214c0b8529d9b3dd597e0462a66bca
Basic support for selecting objects in the editor.

diff -r 77f7cd65e121 -r d5dc9507d612 editor.js
--- a/editor.js	Wed Apr 17 00:23:05 2013 -0700
+++ b/editor.js	Wed Apr 17 23:56:55 2013 -0700
@@ -2,8 +2,12 @@
 
 object.prototype.toHTML = function(node, up) {
 	this.up = up;
+	var astNode = this;
 	var el = newEl('div', {
-		className: 'object'
+		className: 'object',
+		onclick: function(event) {
+			main_module.objectClick(this, astNode, event);
+		}
 	});
 	this.domNode = el;
 	node.appendChild(el);
diff -r 77f7cd65e121 -r d5dc9507d612 src/editor.tp
--- a/src/editor.tp	Wed Apr 17 00:23:05 2013 -0700
+++ b/src/editor.tp	Wed Apr 17 23:56:55 2013 -0700
@@ -242,6 +242,14 @@
 	event stopPropagation: (foreign: undefined)
 }
 
+objectClick <- :domnode astnode event {
+	selectNode: domnode
+	popInscope: ((astnode symbols) allSymbols: (foreign: undefined)) onClick: :key {
+		console log: "fooobar!"
+	}
+	event stopPropagation: (foreign: undefined)
+}
+
 visible <- "showops"
 
 showOps <- {