From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Dmitry Dzhus <dima@sphinx.net.ru>
Newsgroups: gmane.emacs.help
Subject: Re: Execute In Multiple Shells?
Date: Tue, 24 Nov 2009 22:32:51 +0300
Organization: albasani.net
Message-ID: <87y6lvra58.fsf@sphinx.net.ru>
References: <62546fac-b9c5-4eaa-a75f-f2d0cedce91f@x5g2000prf.googlegroups.com>
	<87tywkbwzn.fsf@galatea.local>
NNTP-Posting-Host: lo.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
X-Trace: ger.gmane.org 1259091989 23739 80.91.229.12 (24 Nov 2009 19:46:29 GMT)
X-Complaints-To: usenet@ger.gmane.org
NNTP-Posting-Date: Tue, 24 Nov 2009 19:46:29 +0000 (UTC)
To: help-gnu-emacs@gnu.org
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Nov 24 20:46:22 2009
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Envelope-to: geh-help-gnu-emacs@m.gmane.org
Original-Received: from lists.gnu.org ([199.232.76.165])
	by lo.gmane.org with esmtp (Exim 4.50)
	id 1ND1LA-0005Cx-GD
	for geh-help-gnu-emacs@m.gmane.org; Tue, 24 Nov 2009 20:46:20 +0100
Original-Received: from localhost ([127.0.0.1]:49831 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1ND1L9-0007gP-Rt
	for geh-help-gnu-emacs@m.gmane.org; Tue, 24 Nov 2009 14:46:19 -0500
Original-Path: news.stanford.edu!usenet.stanford.edu!postnews.google.com!news1.google.com!news.glorb.com!feeder.erje.net!news2.arglkargh.de!news.albasani.net!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 25
Original-X-Trace: news.albasani.net
	bCmDB5dIcughgb884a8WFbLQmE1nrnJDjs7Fu0/ftTo7JjOjOY9Owb3AwPlfQ2qA14jomv8Q6QmPAe7YxMfZT24uK98iVjm0oeRRhyM0yeiuhW5zE/T7Rx9r8pZX0R34
Original-X-Complaints-To: abuse@albasani.net
Original-NNTP-Posting-Date: Tue, 24 Nov 2009 19:33:15 +0000 (UTC)
X-User-ID: AoAjYzSWUXna+vFvTRbHYNJZPwerATOl1ArYJveTmkU=
Cancel-Lock: sha1:Xeyk1gc/zPBvFIYtUBp2KiYtgXQ=
	sha1:sMMkmIjMG73QLvTheAHPbqJxKTI=
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (gnu/linux)
X-NNTP-Posting-Host: VIDmw/4YAL8nzkmzsaU4VsIZCLkMNAkzq7Y4c9QsUSY=
Original-Xref: news.stanford.edu gnu.emacs.help:175024
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: Users list for the GNU Emacs text editor <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Xref: news.gmane.org gmane.emacs.help:70095
Archived-At: <http://permalink.gmane.org/gmane.emacs.help/70095>

Pascal J. Bourguignon wrote:

> (defun buffer-named (name)
>   "
> RETURN: the buffer which has as name `name'.
> "
>   (let ((bl (buffer-list)))
>     (unless (and buffer-list-cache buffer-name-map
>                  (equal buffer-list-cache bl))
>       (setf buffer-list-cache (copy-seq bl))
>       (setf buffer-name-map (make-hash-table :test (function equal)))
>       (dolist (buffer buffer-list-cache)
>         (let ((name (buffer-name buffer)))
>           (when name (setf (gethash name buffer-name-map) buffer)))
>         (let ((name (buffer-file-name buffer)))
>           (when name (setf (gethash name buffer-name-map) buffer))))))
>   (or (gethash name buffer-name-map)
>       (gethash (truename name) buffer-name-map)))

How is this different from `get-buffer`?
-- 
Happy Hacking.

http://sphinx.net.ru
む