From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: martin rudalics Newsgroups: gmane.emacs.devel Subject: Info-insert-dir Date: Fri, 16 Mar 2007 20:44:22 +0100 Message-ID: <45FAF396.1030504@gmx.at> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1174074538 30716 80.91.229.12 (16 Mar 2007 19:48:58 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 16 Mar 2007 19:48:58 +0000 (UTC) To: emacs-devel Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri Mar 16 20:48:52 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 1HSIPz-000361-2t for ged-emacs-devel@m.gmane.org; Fri, 16 Mar 2007 20:48:51 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1HSIR7-0006VV-QA for ged-emacs-devel@m.gmane.org; Fri, 16 Mar 2007 14:50:01 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1HSIR5-0006UU-6i for emacs-devel@gnu.org; Fri, 16 Mar 2007 15:49:59 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1HSIR3-0006Rs-Ex for emacs-devel@gnu.org; Fri, 16 Mar 2007 15:49:58 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1HSIR3-0006Rp-8x for emacs-devel@gnu.org; Fri, 16 Mar 2007 14:49:57 -0500 Original-Received: from mail.gmx.net ([213.165.64.20]) by monty-python.gnu.org with smtp (Exim 4.60) (envelope-from ) id 1HSIPt-000849-ML for emacs-devel@gnu.org; Fri, 16 Mar 2007 15:48:46 -0400 Original-Received: (qmail invoked by alias); 16 Mar 2007 19:48:43 -0000 X-Provags-ID: V01U2FsdGVkX1/DFDxUdu3DXFKC6yRqpA85FEZY0v1Qkc5FAIm+JI NiGJst0zeIE1AT User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206) X-Accept-Language: de-DE, de, en-us, en X-Y-GMX-Trusted: 0 X-detected-kernel: Linux 2.6, seldom 2.4 (older, 4) 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:68016 Archived-At: I fail to understand the following code in `Info-insert-dir': (let ((dirs (if Info-additional-directory-list (append Info-directory-list Info-additional-directory-list) Info-directory-list)) ... ;; Search the directory list for the directory file. (while dirs .... (unless (cdr dirs) (set (make-local-variable 'Info-dir-contents-directory) (file-name-as-directory (car dirs)))) (setq dirs (cdr dirs)))) According to the doc-string of `Info-directory-list' "the directory of Info files that come with Emacs is put last (so that local Info files override standard ones)" Apparently that's what the "unless ..." form relies upon to produce a default-directory. When `Info-additional-directory-list' is non-nil the "append ..." form appends that list and the "unless ..." form will return the last directory in `Info-additional-directory-list'. If that directory does not exist, the value of default-directory is nil.