ui.gadgets: remove '(set-rect-dim)'
							parent
							
								
									22fb3f329c
								
							
						
					
					
						commit
						f1f7fe5dd8
					
				| 
						 | 
					@ -165,13 +165,6 @@ DEFER: relayout
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: hide-gadget ( gadget -- ) f swap (>>visible?) ;
 | 
					: hide-gadget ( gadget -- ) f swap (>>visible?) ;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: (set-rect-dim) ( dim gadget quot -- )
 | 
					 | 
				
			||||||
    >r 2dup rect-dim =
 | 
					 | 
				
			||||||
    [ [ 2drop ] [ set-rect-dim ] if ] 2keep
 | 
					 | 
				
			||||||
    [ drop ] r> if ; inline
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
DEFER: in-layout?
 | 
					DEFER: in-layout?
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: do-invalidate ( gadget -- gadget )
 | 
					: do-invalidate ( gadget -- gadget )
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue