bug#74496: 30.0.91; fullscreen frame set with F11 is shifted when ctwm restarts

[Van Ly via "Bug reports for GNU Emacs, the Swiss army knife of text editors" <bug-gnu-emacs@gnu.org>]

>
> What does (frame-geometry) evaluate to before and after restarting CTWM?
> What does (frame-parameter nil 'fullscreen) evaluate to before and after
> restarting CTWM?  Does a maximized frame change too?
>

Having the ctwm maximized zoom frame lets both kinds of full frames
persist across ctwm restart.  Then, only having full frames be of the
F11 fullscreen type lets the fullscreen persist across ctwm restart.

The result on Line 27 below seems to be key.

Thanks.

   1  ;; A. F11 fullscreen before
   2  (frame-geometry)
   3  ((outer-position -3 . -3) (outer-size 1920 . 1080) (external-border-size -3 . -3) (outer-border-width . 0) (title-bar-size 0 . 6) (menu-bar-external . t) (menu-bar-size 0 . 0) (tab-bar-size 1918 . 14) (tool-bar-external) (tool-bar-position . top) (tool-bar-size 0 . 0) (internal-border-width . 1))
   4
   5  ;; Z. F11 fullscreen after
   6  (frame-geometry)
   7  ((outer-position -3 . -3) (outer-size 1920 . 1080) (external-border-size -3 . -3) (outer-border-width . 0) (title-bar-size 0 . 6) (menu-bar-external . t) (menu-bar-size 0 . 0) (tab-bar-size 1918 . 14) (tool-bar-external) (tool-bar-position . top) (tool-bar-size 0 . 0) (internal-border-width . 1))
   8
   9
  10  ;; A. F11 fullscreen before
  11  (frame-parameter nil 'fullscreen) ; => fullboth
  12
  13
  14  ;; Z. F11 fullscreen after
  15  (frame-parameter nil 'fullscreen) ; => nil
  16
  17
  18  ;; A. ctwm max zoom before
  19  (frame-geometry)
  20  ((outer-position 0 . 0) (outer-size 1914 . 1074) (external-border-size -3 . -3) (outer-border-width . 0) (title-bar-size 0 . 6) (menu-bar-external . t) (menu-bar-size 0 . 0) (tab-bar-size 1912 . 14) (tool-bar-external) (tool-bar-position . top) (tool-bar-size 0 . 0) (internal-border-width . 1))
  21
  22  ;; Z. ctwm max zoom after
  23  (frame-geometry)
  24  ((outer-position 0 . 0) (outer-size 1914 . 1074) (external-border-size -3 . -3) (outer-border-width . 0) (title-bar-size 0 . 6) (menu-bar-external . t) (menu-bar-size 0 . 0) (tab-bar-size 1912 . 14) (tool-bar-external) (tool-bar-position . top) (tool-bar-size 0 . 0) (internal-border-width . 1))
  25
  26  ;; A. ctwm max zoom before
=>27  (frame-parameter nil 'fullscreen) ; => maximized
  28
  29  ;; Z. ctwm max zoom after
  30  (frame-parameter nil 'fullscreen) ; => nil


-- 
vl