From xemacs-m  Mon Aug 11 07:14:15 1997
Received: from kurims.kurims.kyoto-u.ac.jp (kurims.kurims.kyoto-u.ac.jp [130.54.16.1])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id HAA21051
	for <xemacs-beta@xemacs.org>; Mon, 11 Aug 1997 07:14:07 -0500 (CDT)
Received: from orion.kurims.kyoto-u.ac.jp (orion.kurims.kyoto-u.ac.jp [130.54.16.5]) by kurims.kurims.kyoto-u.ac.jp (8.8.5/3.4W2) with SMTP id VAA03695; Mon, 11 Aug 1997 21:14:00 +0900 (JST)
Received: (from petersen@localhost) by orion.kurims.kyoto-u.ac.jp (SMI-8.6/3.5Wbeta) id VAA10933; Mon, 11 Aug 1997 21:13:59 +0900
To: "Karl M. Hegbloom" <karlheg@inetarena.com>
Cc: XEmacs Beta List <xemacs-beta@xemacs.org>
Subject: info problem
X-Emacs: 20.3 "Bucharest" XEmacs  Lucid (beta17) with mule
Mime-Version: 1.0 (generated by SEMI MIME-Edit 0.86 "Naka-Tsurugi")
Content-Type: text/plain; charset=US-ASCII
From: Jens-Ulrik Holger Petersen <petersen@kurims.kyoto-u.ac.jp>
Date: 11 Aug 1997 21:13:59 +0900
Message-ID: <lbg1sglxx4.fsf@orion.kurims.kyoto-u.ac.jp>
Lines: 62

[I didn't have time to follow all the changes made to info recently.]

Info works for me (Bucharest) with xemacs -q --no-site-file.


But with my init file where I set

(defvar Info-directory-list Info-default-directory-list)
(setq Info-directory-list
      (cons "/home/petersen/info/" Info-directory-list))

and the "info/" I add has its own "dir" file (in the (old?) FSF
format, whatever that is), I get the backtrace:

---- Start of included text -----------------------8<--- cut here -------------
Signaling: (error "No such node: XEmacs")
  signal(error ("No such node: XEmacs"))
  cerror("No such node: %s" "XEmacs")
  apply(cerror ("No such node: %s" "XEmacs"))
  error("No such node: %s" "XEmacs")
  (or Info-current-node (error "No such node: %s" nodename))
)
  (catch (quote foo) (while (search-forward "\n^_" nil t) (forward-line 1) (let ... ... ...)) (setq found nil) (let (... ... ... ... anode aline) (while ... ... ...) (if anode ... ...)) (or Info-current-node (error "No such node: %s" nodename)))
)
  (let* ((qnode ...) (regexp ...) (guesspos ...) (found t)) (if (marker-position Info-tag-table-marker) (save-excursion ... ... ...)) (goto-char (max ... ...)) (catch (quote foo) (while ... ... ...) (setq found nil) (let ... ... ...) (or Info-current-node ...)) (if found (progn ... ... ...)))
)
  (if (equal nodename "*") (progn (setq Info-current-node nodename) (Info-set-mode-line) (goto-char ...)) (let* (... ... ... ...) (if ... ...) (goto-char ...) (catch ... ... ... ... ...) (if found ...)))
)
  (progn (or (null filename) (equal Info-current-file filename) (let ... ... ... ... ... ... ... ... ... ...)) (if (equal nodename "*") (progn ... ... ...) (let* ... ... ... ... ...)))
)
  (unwind-protect (progn (or ... ... ...) (if ... ... ...)) (or Info-current-node no-going-back (let ... ... ...)))
)
  Info-find-file-node(nil "XEmacs" nil t nil)
  (cond ((null filename) (Info-find-file-node nil nodename no-going-back tryfile line)) ((let ... ...) (Info-find-file-node filename nodename no-going-back tryfile line)) ((string-match ... filename) (browse-url filename)) (t (error "Info file %s does not exist" filename)))
)
  Info-find-node(nil "XEmacs" nil t)
  (let (filename) (string-match "\\s *\\((\\s *\\([^	)]*\\)\\s *)\\s *\\|\\)\\(.*\\)" nodename) (setq filename (if ... "" ...) nodename (substring nodename ... ...)) (let (...) (if trim ...)) (let (...) (if trim ...)) (Info-find-node (if ... nil filename) (if ... "Top" nodename) no-going-back (and tryfile ...)))
)
  Info-goto-node("XEmacs" nil t)
  eval((Info-goto-node "XEmacs" nil t))
  (let ((msg ...)) (message "%s" msg) (eval (nth 1 data)) (message "%sdone" msg))
)
  (if (null data) nil (let (...) (message "%s" msg) (eval ...) (message "%sdone" msg)) t)
)
  (let ((data ...)) (if (null data) nil (let ... ... ... ...) t))
)
  Info-follow-nearest-node(1427)
  (and (event-point event) (Info-follow-nearest-node (max ... ...)))
)
  (or (and (event-point event) (Info-follow-nearest-node ...)) (error "click on a cross-reference to follow"))
)
  Info-follow-clicked-node(#<buttondown-event button2>)
  call-interactively(Info-follow-clicked-node)
---- End of included text -------------------------8<--- and here -------------

when I try to access the xemacs manual.  Others manuals seems to be fine.

Removing the "dir" file in my info directory doesn't help.

Solution appreciated.

Jens

