updated
This commit is contained in:
		
							parent
							
								
									bd460b2902
								
							
						
					
					
						commit
						a27329f270
					
				| 
						 | 
				
			
			@ -14,7 +14,7 @@
 | 
			
		|||
	  string->keys string->key key:keycode key:modifiers
 | 
			
		||||
 | 
			
		||||
	  reparent-to-root window-path
 | 
			
		||||
	  window-viewable?
 | 
			
		||||
	  window-viewable? window-mapped?
 | 
			
		||||
	  window-focused?
 | 
			
		||||
	  window-contains-focus?
 | 
			
		||||
	  take-focus delete-window
 | 
			
		||||
| 
						 | 
				
			
			@ -26,7 +26,7 @@
 | 
			
		|||
	  invalidate-window
 | 
			
		||||
	  text-center-pos
 | 
			
		||||
	  window-level
 | 
			
		||||
	  point-in-rectangle?
 | 
			
		||||
	  point-in-rectangle? rectangles-overlap?
 | 
			
		||||
	  set-wm-state! get-wm-state ((wm-state) :syntax)
 | 
			
		||||
	  send-configuration
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -99,7 +99,7 @@
 | 
			
		|||
	  wm-clients wm-current-client
 | 
			
		||||
 | 
			
		||||
	  wm-manage-window wm-unmanage-window wm-select-client
 | 
			
		||||
	  wm-configure-window
 | 
			
		||||
	  wm-configure-window wm-iconify-window wm-maximize-window
 | 
			
		||||
 | 
			
		||||
	  client? client:window client:client-window
 | 
			
		||||
	  client:data set-client:data!
 | 
			
		||||
| 
						 | 
				
			
			@ -125,7 +125,8 @@
 | 
			
		|||
	manager key-grab
 | 
			
		||||
	utils dragging titlebar)
 | 
			
		||||
  (files move-wm
 | 
			
		||||
	 move-wm-resizer))
 | 
			
		||||
	 move-wm-resizer
 | 
			
		||||
	 move-wm-icon))
 | 
			
		||||
 | 
			
		||||
;; *** split manager *************************************************
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue