Mercurial > repos > tabletprog

diff src/editor.tp @ 120:d5dc9507d612

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Basic support for selecting objects in the editor.
author Mike Pavone <pavone@retrodev.com>
date Wed, 17 Apr 2013 23:56:55 -0700
parents 77f7cd65e121
children 1157639353e7
line wrap: on
line diff
--- 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 <- {