emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Add function to rotate/transpose all windows


From: martin rudalics
Subject: Re: Add function to rotate/transpose all windows
Date: Sun, 17 Nov 2024 17:38:10 +0100
User-agent: Mozilla Thunderbird

> Ok, I applied this and it works fine now.  Look in the file
> attached.

I'm not convinced yet.  Here

     (split-window
               cwin
               split-size
               split-type
               t
               (progn
                 (while (listp (caaddr win))
                   (setq win (caddr win)))
                 (caaddr win)))

you never pass a parent window to 'split-window' but I think you should.
With my standard setup I get

((#<window 17 on *foo*> . #<window 18>)
 (#<window 19 on *foo*> . #<window 18>)
 (#<window 15 on *foo*> . #<window 14>)
 (#<window 6 on window-transpose.el> . #<window 12>)
 (#<window 13 on *foo*> . #<window 16>))

before 'rotate-windows-clockwise' and

((#<window 17 on *foo*> . #<window 18>)
 (#<window 19 on *foo*> . #<window 18>)
 (#<window 15 on *foo*> . #<window 14>)
 (#<window 6 on window-transpose.el> . #<window 20>)
 (#<window 13 on *foo*> . #<window 21>))

afterwards: Both parent windows 12 and 16 have been lost and new parent
windows 20 and 21 have been created.

martin



reply via email to

[Prev in Thread] Current Thread [Next in Thread]