added setting of the WM_STATE property
added 'transition to withdrawn' recognition
This commit is contained in:
		
							parent
							
								
									af17dd9326
								
							
						
					
					
						commit
						231b674a6e
					
				|  | @ -158,6 +158,7 @@ | |||
| 	      (list 'init-client client maybe-rect)) | ||||
| 	(send internal-out-channel (list 'fit-client client)) | ||||
| 	;; sync ?? | ||||
| 	(set-wm-state! dpy window (wm-state normal) none) | ||||
| 	(map-window dpy window) | ||||
| 	(send internal-out-channel (list 'update-client-state client)))) | ||||
| 
 | ||||
|  | @ -412,7 +413,11 @@ | |||
| 		(mdisplay "manager " (wm:type wm) " reparented client\n") | ||||
| 		(wm-deinit-client wm client) | ||||
| 		(exit 'reparent)))) | ||||
| 	 ;; TODO: withdrawn-state etc. unmap-event ... | ||||
| 	 ((unmap-event? xevent) | ||||
| 	  ;; might be the transition to withdrawn-state, wm-state | ||||
| 	  ;; change by root-manager | ||||
| 	  (wm-deinit-client wm client) | ||||
| 	  (exit 'unmap)) | ||||
| 	 ((destroy-window-event? xevent) | ||||
| 	  (mdisplay "destroy-window-event client " wm " " client "\n") | ||||
| 	  (if (eq? (client:window client) (destroy-window-event-event xevent)) | ||||
|  |  | |||
		Loading…
	
		Reference in New Issue
	
	 frese
						frese