GNU bug report logs - #8258
INFOPATH bug on Windows

Previous Next

Full log

View this message in rfc822 format

From: help-debbugs <at> gnu.org (GNU bug Tracking System)
To: Ralph Schleicher <ralph <at> mueller-schleicher.de>
Subject: bug#8258: closed (Re: bug#8258: INFOPATH bug on Windows)
Date: Wed, 16 Mar 2011 00:05:02 +0000

[Message part 1 (text/plain, inline)]

Your bug report

#8258: INFOPATH bug on Windows

which was filed against the emacs package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to 8258 <at> debbugs.gnu.org.

-- 
8258: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=8258
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems

[Message part 2 (message/rfc822, inline)]

From: Juanma Barranquero <lekktu <at> gmail.com>
To: Ralph Schleicher <ralph <at> mueller-schleicher.de>
Cc: 8258-done <at> debbugs.gnu.org
Subject: Re: bug#8258: INFOPATH bug on Windows
Date: Wed, 16 Mar 2011 01:04:05 +0100

> on Windows, Emacs 23.3 fails to parse INFOPATH due to a hard-coded
> colon as path separator.

In fact, the current code parses INFOPATH (quite by accident), but
fails to take into account the case where INFOPATH should be appended
to Info-default-directory-list.

So, yours is a valid fix and I've committed it to the emacs-23 branch.

Thanks,

    Juanma

[Message part 3 (message/rfc822, inline)]

From: Ralph Schleicher <ralph <at> mueller-schleicher.de>
To: bug-gnu-emacs <at> gnu.org
Subject: INFOPATH bug on Windows
Date: Tue, 15 Mar 2011 20:44:40 +0100

Hi,

on Windows, Emacs 23.3 fails to parse INFOPATH due to a hard-coded
colon as path separator.  Below is a patch together with a change
log entry.


2011-03-11  Ralph Schleicher  <rs <at> ralph-schleicher.de>

	* info.el (info-initialize): Replace all uses of `:' with
	path-separator for compatibility with non-Unix systems.
	Cache quoting of path-separator.


--- emacs-23.3/lisp/info.el.orig	2011-01-08 12:45:14 +0100
+++ emacs-23.3/lisp/info.el	2011-03-11 11:45:14 +0100
@@ -588,15 +588,15 @@
 (defun info-initialize ()
   "Initialize `Info-directory-list', if that hasn't been done yet."
   (unless Info-directory-list
-    (let ((path (getenv "INFOPATH")))
+    (let ((path (getenv "INFOPATH"))
+	  (sep (regexp-quote path-separator)))
       (setq Info-directory-list
 	    (prune-directory-list
 	     (if path
-		 (if (string-match ":\\'" path)
-		     (append (split-string (substring path 0 -1)
-					   (regexp-quote path-separator))
+		 (if (string-match (concat sep "\\'") path)
+		     (append (split-string (substring path 0 -1) sep)
 			     (Info-default-dirs))
-		   (split-string path (regexp-quote path-separator)))
+		   (split-string path sep))
 	       (Info-default-dirs)))))))
 
 ;;;###autoload


-- 
Ralph

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.