[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
address@hidden: finding clone]
From: |
Richard Stallman |
Subject: |
address@hidden: finding clone] |
Date: |
Sat, 29 Apr 2006 15:09:30 -0400 |
What code does "the buffer clone package" refer to?
------- Start of forwarded message -------
Date: Fri, 28 Apr 2006 09:59:53 -0400
From: Bill Lytton <address@hidden>
To: address@hidden
Subject: finding clone
Reply-To: address@hidden
X-Spam-Status: No, score=0.0 required=5.0 tests=none autolearn=failed
version=3.0.4
I imagine that you guys are already working on augmenting the buffer clone
package
I would suggest having a routine such as the following that will allow you to
find
an existing clone once it's been lost in a pile of buffers
(defun find-clone ()
"Find another buffer looking at same file (made from clone-indirect-buffer)"
(interactive)
(let ((blist (cdr (buffer-list))) ;; leave off current buffer
(f (buffer-file-name)) f2 done bl)
(while (and blist (not done))
(setq bl (car blist) f2 (buffer-file-name bl) blist (cdr blist))
(and (string= f f2)(setq done t)))
(if done (pop-to-buffer bl)
(message "No clone found"))))
_______________________________________________
bug-gnu-emacs mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/bug-gnu-emacs
------- End of forwarded message -------
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- address@hidden: finding clone],
Richard Stallman <=