Prevent certain frame parameters from being saved/restored
* exwm-input.el (exwm-input--init): * exwm-randr.el (exwm-randr--init): * exwm-workspace.el (exwm-workspace--init): Add certain frame parameters into `frameset-filter-alist' to prevent them from being saved/restored which makes little sense and is problematic.
This commit is contained in:
		
							parent
							
								
									b11ac2e6dc
								
							
						
					
					
						commit
						4c043471c5
					
				
					 3 changed files with 16 additions and 3 deletions
				
			
		| 
						 | 
					@ -767,7 +767,11 @@ Its usage is the same with `exwm-input-set-simulation-keys'."
 | 
				
			||||||
  ;; Re-grab global keys.
 | 
					  ;; Re-grab global keys.
 | 
				
			||||||
  (add-hook 'exwm-workspace-list-change-hook
 | 
					  (add-hook 'exwm-workspace-list-change-hook
 | 
				
			||||||
            #'exwm-input--on-workspace-list-change)
 | 
					            #'exwm-input--on-workspace-list-change)
 | 
				
			||||||
  (exwm-input--on-workspace-list-change))
 | 
					  (exwm-input--on-workspace-list-change)
 | 
				
			||||||
 | 
					  ;; Prevent frame parameters introduced by this module from being
 | 
				
			||||||
 | 
					  ;; saved/restored.
 | 
				
			||||||
 | 
					  (dolist (i '(exwm-grabbed))
 | 
				
			||||||
 | 
					    (push (cons i :never) frameset-filter-alist)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
(defun exwm-input--exit ()
 | 
					(defun exwm-input--exit ()
 | 
				
			||||||
  "Exit the input module."
 | 
					  "Exit the input module."
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -160,7 +160,11 @@
 | 
				
			||||||
                           ;;            xcb:randr:NotifyMask:CrtcChange))
 | 
					                           ;;            xcb:randr:NotifyMask:CrtcChange))
 | 
				
			||||||
                           ))
 | 
					                           ))
 | 
				
			||||||
        (xcb:flush exwm--connection)
 | 
					        (xcb:flush exwm--connection)
 | 
				
			||||||
        (add-hook 'exwm-workspace-list-change-hook #'exwm-randr--refresh)))))
 | 
					        (add-hook 'exwm-workspace-list-change-hook #'exwm-randr--refresh))))
 | 
				
			||||||
 | 
					  ;; Prevent frame parameters introduced by this module from being
 | 
				
			||||||
 | 
					  ;; saved/restored.
 | 
				
			||||||
 | 
					  (dolist (i '(exwm-randr-output exwm-geometry))
 | 
				
			||||||
 | 
					    (push (cons i :never) frameset-filter-alist)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
(defun exwm-randr--exit ()
 | 
					(defun exwm-randr--exit ()
 | 
				
			||||||
  "Exit the RandR module."
 | 
					  "Exit the RandR module."
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -1466,7 +1466,12 @@ applied to all subsequently created X frames."
 | 
				
			||||||
  (add-hook 'delete-frame-functions
 | 
					  (add-hook 'delete-frame-functions
 | 
				
			||||||
            #'exwm-workspace--remove-frame-as-workspace)
 | 
					            #'exwm-workspace--remove-frame-as-workspace)
 | 
				
			||||||
  ;; Switch to the first workspace
 | 
					  ;; Switch to the first workspace
 | 
				
			||||||
  (exwm-workspace-switch 0 t))
 | 
					  (exwm-workspace-switch 0 t)
 | 
				
			||||||
 | 
					  ;; Prevent frame parameters introduced by this module from being
 | 
				
			||||||
 | 
					  ;; saved/restored.
 | 
				
			||||||
 | 
					  (dolist (i '(exwm-outer-id exwm-id exwm-container exwm-workspace
 | 
				
			||||||
 | 
					                             fullscreen exwm-selected-window exwm-urgency))
 | 
				
			||||||
 | 
					    (push (cons i :never) frameset-filter-alist)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
(defun exwm-workspace--exit ()
 | 
					(defun exwm-workspace--exit ()
 | 
				
			||||||
  "Exit the workspace module."
 | 
					  "Exit the workspace module."
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue