From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.devel Subject: Re: Include buffer-move.el Date: Wed, 15 Aug 2007 14:14:08 +0300 Organization: JURTA Message-ID: <877inxoxrz.fsf@jurta.org> References: <87vebhzndq.fsf@jurta.org> <7dbe73ed0708150001t7c6ad1b3k9a69de992db8b88b@mail.gmail.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1187176878 28755 80.91.229.12 (15 Aug 2007 11:21:18 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 15 Aug 2007 11:21:18 +0000 (UTC) Cc: Eli Zaretskii , sdl.web@gmail.com, emacs-devel@gnu.org To: "Mathias Dahl" Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Aug 15 13:21:15 2007 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1ILGw6-000279-HK for ged-emacs-devel@m.gmane.org; Wed, 15 Aug 2007 13:21:14 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ILGw5-00026I-W2 for ged-emacs-devel@m.gmane.org; Wed, 15 Aug 2007 07:21:14 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1ILGvn-0001y8-B0 for emacs-devel@gnu.org; Wed, 15 Aug 2007 07:20:55 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1ILGvk-0001wp-FF for emacs-devel@gnu.org; Wed, 15 Aug 2007 07:20:54 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ILGvk-0001wl-BR for emacs-devel@gnu.org; Wed, 15 Aug 2007 07:20:52 -0400 Original-Received: from relay02.kiev.sovam.com ([62.64.120.197]) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1ILGvj-0005mA-8w; Wed, 15 Aug 2007 07:20:51 -0400 Original-Received: from [83.170.232.243] (helo=smtp.svitonline.com) by relay02.kiev.sovam.com with esmtp (Exim 4.67) (envelope-from ) id 1ILGvZ-000Gvh-J0; Wed, 15 Aug 2007 14:20:49 +0300 In-Reply-To: <7dbe73ed0708150001t7c6ad1b3k9a69de992db8b88b@mail.gmail.com> (Mathias Dahl's message of "Wed\, 15 Aug 2007 09\:01\:30 +0200") User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.1.50 (gnu/linux) X-Scanner-Signature: 7ffaa6bc246e67c9b1a22e0c753f4a43 X-DrWeb-checked: yes X-SpamTest-Envelope-From: juri@jurta.org X-SpamTest-Group-ID: 00000000 X-SpamTest-Header: Not Detected X-SpamTest-Info: Profiles 1388 [August 14 2007] X-SpamTest-Info: helo_type=3 X-SpamTest-Info: {HEADERS: header Content-Type found without required header Content-Transfer-Encoding} X-SpamTest-Method: none X-SpamTest-Rate: 10 X-SpamTest-Status: Not detected X-SpamTest-Status-Extended: not_detected X-SpamTest-Version: SMTP-Filter Version 3.0.0 [0255], KAS30/Release X-Detected-Kernel: FreeBSD 4.8-5.1 (or MacOS X 10.2-10.3) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:76565 Archived-At: >> I think we should indeed add this functionality to windmove.el. > > A similar function was discussed a while ago in gnu.emacs.help > (subject "rotate split windows") and a simple solution developed: > > http://groups.google.com/group/gnu.emacs.help/browse_thread/thread/5197a0895413ee6c/443d6b1f25e0c585?lnk=gst&q=rotate+buffer&rnum=2#443d6b1f25e0c585 > > The difference is that the buffers are rotated, so you cannot do > exactly what buffer-move seems to do. I thought I should mention it > however in case people like that better. Then I should mention my version of this function: (defun rotate-window-buffers (&optional n) "Exchange buffers in all windows N times. With positive N, it uses the window order of `window-list'. With negative N, does this in the reverse order." (interactive "p") (let* ((ws (window-list)) (bs (mapcar 'window-buffer ws)) (ps (mapcar 'window-point ws)) (n (mod (or n 1) (length ws)))) (dolist (w (append (last ws n) (butlast ws n))) (set-window-buffer w (pop bs)) (set-window-point w (pop ps))))) This is less flexible than proposed buffer-move, but still very useful. I use it mostly to exchange two buffers in the horizontally split two-window frame (this is like using `C-u' in commander-like file managers to swap two panels). Perhaps this command should be added to window.el. -- Juri Linkov http://www.jurta.org/emacs/