emacs-devel
[Top][All Lists]
Advanced

[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 -------




reply via email to

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