Make actions into singletons
							parent
							
								
									b6eaa397af
								
							
						
					
					
						commit
						081ec95043
					
				| 
						 | 
					@ -70,14 +70,14 @@ TUPLE: drag # ;             C: <drag> drag
 | 
				
			||||||
TUPLE: button-up mods # ;   C: <button-up> button-up
 | 
					TUPLE: button-up mods # ;   C: <button-up> button-up
 | 
				
			||||||
TUPLE: button-down mods # ; C: <button-down> button-down
 | 
					TUPLE: button-down mods # ; C: <button-down> button-down
 | 
				
			||||||
 | 
					
 | 
				
			||||||
SYMBOLS:
 | 
					SINGLETONS:
 | 
				
			||||||
motion
 | 
					motion
 | 
				
			||||||
mouse-scroll
 | 
					mouse-scroll
 | 
				
			||||||
mouse-enter mouse-leave
 | 
					mouse-enter mouse-leave
 | 
				
			||||||
lose-focus gain-focus ;
 | 
					lose-focus gain-focus ;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
! Higher-level actions
 | 
					! Higher-level actions
 | 
				
			||||||
SYMBOLS:
 | 
					SINGLETONS:
 | 
				
			||||||
undo-action redo-action
 | 
					undo-action redo-action
 | 
				
			||||||
cut-action copy-action paste-action
 | 
					cut-action copy-action paste-action
 | 
				
			||||||
delete-action select-all-action
 | 
					delete-action select-all-action
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue