emacs-devel
[Top][All Lists]
Advanced

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

Re: master 6a2ee981c3: Add new functions for splitting the root window


From: Gregory Heytings
Subject: Re: master 6a2ee981c3: Add new functions for splitting the root window
Date: Fri, 16 Sep 2022 14:30:03 +0000



Since you mention various custom repeatable commands, I think we're missing a less drastic version of delete-other-windows which deletes all siblings in the window configuration tree of the selected window.

In other words, the non-root-window version on C-x 1.


Is this what you have in mind?

(defun delete-other-windows-soft (&optional arg)
  (interactive "P")
  (if arg
      (delete-other-windows)
    (let* ((w (window-child (window-parent))) (wl (list w)))
      (while (setq w (window-next-sibling w)) (push w wl))
      (dolist (w wl)
        (when (and (not (eq w (selected-window)))
                   (not (window-parameter w 'no-delete-other-windows)))
          (ignore-errors (delete-window w)))))))



reply via email to

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