From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Richard Stallman Newsgroups: gmane.emacs.devel Subject: [billl@neurosim.downstate.edu: finding clone] Date: Sat, 29 Apr 2006 15:09:30 -0400 Message-ID: Reply-To: rms@gnu.org NNTP-Posting-Host: main.gmane.org Content-Type: text/plain; charset=ISO-8859-15 X-Trace: sea.gmane.org 1146337822 1375 80.91.229.2 (29 Apr 2006 19:10:22 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 29 Apr 2006 19:10:22 +0000 (UTC) Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sat Apr 29 21:10:22 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FZupe-0004i4-Ty for ged-emacs-devel@m.gmane.org; Sat, 29 Apr 2006 21:10:19 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FZupe-00039A-B6 for ged-emacs-devel@m.gmane.org; Sat, 29 Apr 2006 15:10:18 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1FZuot-0002t2-Fe for emacs-devel@gnu.org; Sat, 29 Apr 2006 15:09:31 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1FZuot-0002sl-0j for emacs-devel@gnu.org; Sat, 29 Apr 2006 15:09:31 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FZuos-0002sf-PV for emacs-devel@gnu.org; Sat, 29 Apr 2006 15:09:30 -0400 Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.52) id 1FZusJ-0004Y0-2a for emacs-devel@gnu.org; Sat, 29 Apr 2006 15:13:03 -0400 Original-Received: from rms by fencepost.gnu.org with local (Exim 4.34) id 1FZuos-0000vI-5f; Sat, 29 Apr 2006 15:09:30 -0400 Original-To: emacs-devel@gnu.org 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:53610 Archived-At: 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 To: bug-gnu-emacs@gnu.org Subject: finding clone Reply-To: billl@neurosim.downstate.edu 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 bug-gnu-emacs@gnu.org http://lists.gnu.org/mailman/listinfo/bug-gnu-emacs ------- End of forwarded message -------