* infohack.el: Load dgnushack.el and ptexinfmt.el first.

diff --git a/ChangeLog b/ChangeLog
index 791c9fe..0ed76bf 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2003-04-28  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+       * texi/infohack.el: Load dgnushack.el and ptexinfmt.el first.
+
+2003-04-28  Katsumi Yamaoka  <yamaoka@jpl.org>
+
        * lisp/gnus-vers.el: T-gnus 6.15.19 revision 00.
 
 2003-04-24  Katsumi Yamaoka  <yamaoka@jpl.org>

diff --git a/texi/infohack.el b/texi/infohack.el
index d355e54..3c173ba 100644 (file)
--- a/texi/infohack.el
+++ b/texi/infohack.el
@@ -25,7 +25,11 @@
 
 ;;; Code:
 
-(require 'texinfmt)
+(let ((default-directory (expand-file-name "../lisp/"))
+      (features (cons 'w3-forms (copy-sequence features))))
+  ;; Adjust `load-path' for APEL.
+  (load-file "dgnushack.el"))
+(load-file (expand-file-name "ptexinfmt.el" "./"))
 
 (defun infohack-remove-unsupported ()
   (goto-char (point-min))
@@ -86,12 +90,6 @@ Both characters must have the same length of multi-byte form."
   (setq command-line-args-left nil))
 
 \f
-(let ((default-directory (expand-file-name "../lisp/"))
-      (features (cons 'w3-forms (copy-sequence features))))
-  ;; Adjust `load-path' for APEL.
-  (load-file "dgnushack.el"))
-(load-file (expand-file-name "ptexinfmt.el" "./"))
-
 (defun infohack-texi-format (file &optional addsuffix)
   (let ((auto-save-default nil)
        (find-file-run-dired nil)