From: yamaoka <yamaoka>
Date: Mon, 27 Oct 2003 05:17:43 +0000 (+0000)
Subject: * infohack.el: Don't fiddle with the `features' variable;
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=803727715bceb67b51434120ce2115771a83f465;p=elisp%2Fgnus.git-

* infohack.el: Don't fiddle with the `features' variable;
 fix directories relative to the ../lisp directory in `load-path'.
---

diff --git a/ChangeLog b/ChangeLog
index 267e6b2..49c1c4a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-27  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* texi/infohack.el: Don't fiddle with the `features' variable;
+	fix directories relative to the ../lisp directory in `load-path'.
+
 2003-10-24  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* Makefile.in (install-package): Don't call `compose-package'.
diff --git a/texi/infohack.el b/texi/infohack.el
index 4dbea85..89bad3f 100644
--- a/texi/infohack.el
+++ b/texi/infohack.el
@@ -25,10 +25,11 @@
 
 ;;; Code:
 
-(let ((default-directory (expand-file-name "../lisp/"))
-      (features (cons 'w3-forms (copy-sequence features))))
+(let ((default-directory (expand-file-name "../lisp/")))
   ;; Adjust `load-path' for APEL.
-  (load-file "dgnushack.el"))
+  (load-file "dgnushack.el")
+  ;; Replace "./" with "../lisp/" in `load-path'.
+  (setq load-path (mapcar 'expand-file-name load-path)))
 (load-file (expand-file-name "ptexinfmt.el" "./"))
 
 (defun infohack-remove-unsupported ()