Mercurial > repos > tabletprog

comparison editor.tp @ 29:18cec540238a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Prevent event bubbling so lambda click handler doesn't get called when clicking on an element inside it
author Mike Pavone <pavone@retrodev.com>
date Thu, 05 Apr 2012 21:06:43 -0700
parents 93bbc4c8be95
children
comparison
equal deleted inserted replaced
28:93bbc4c8be95 29:18cec540238a
95 onclick <- { handler: key } 95 onclick <- { handler: key }
96 }) 96 })
97 } 97 }
98 } 98 }
99 99
100 symbolClick <- :domnode astnode { 100 symbolClick <- :domnode astnode event {
101 console log: astnode 101 console log: astnode
102 selectNode: domnode 102 selectNode: domnode
103 popInscope: ((astnode symbols) allSymbols) onClick: :key { 103 popInscope: ((astnode symbols) allSymbols) onClick: :key {
104 domnode textContent!: key 104 domnode textContent!: key
105 astnode name!: key 105 astnode name!: key
106 } 106 }
107 107 event stopPropagation
108 } 108 }
109 109
110 funClick <- :domnode astnode { 110 funClick <- :domnode astnode event {
111 selectParent: domnode 111 selectParent: domnode
112 selectQuery: ".selectParent > .funpart" in: (domnode parentNode) 112 selectQuery: ".selectParent > .funpart" in: (domnode parentNode)
113 symtable <- astnode symbols 113 symtable <- astnode symbols
114 syms <- filter: (symtable allSymbols) :sym { 114 syms <- filter: (symtable allSymbols) :sym {
115 isLambda: ((symtable find: sym) def) 115 isLambda: ((symtable find: sym) def)
116 } 116 }
117 popInscope: syms 117 popInscope: syms onClick: {}
118 event stopPropagation
118 } 119 }
119 120
120 lambdaClick <- :domnode astnode { 121 lambdaClick <- :domnode astnode event {
121 symbolClick: domnode astnode 122 symbolClick: domnode astnode event
122 } 123 }
123 124
124 main <- { 125 main <- {
125 //bind handlers for file browser links 126 //bind handlers for file browser links
126 each: (qall: "a") :idx el { 127 each: (qall: "a") :idx el {