[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
error from octave-inf: inferior-octave-resync-dirs
From: |
Gerd Bürger |
Subject: |
error from octave-inf: inferior-octave-resync-dirs |
Date: |
Fri, 10 Nov 2006 15:00:52 +0100 |
User-agent: |
Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.0.7) Gecko/20060918 Thunderbird/1.5.0.7 Mnenhy/0.7.4.666 |
In version 1.15 of octave-inf.el, the call
(inferior-octave-resync-dirs)
was added at startup. This produces the attached error. Is this caused
by the "ans = /path/to/dir" response to the pwd command in that function?
Gerd
----------------
Debugger entered--Lisp error: (error "No such directory found via CDPATH
environment variable")
signal(error ("No such directory found via CDPATH environment variable"))
error("No such directory found via CDPATH environment variable")
cd("ans = /home/gerd/oct")
inferior-octave-resync-dirs()
(let ((proc ...)) (set-process-filter proc (quote
inferior-octave-output-digest)) (setq comint-ptyp
process-connection-type inferior-octave-process proc
inferior-octave-output-list nil inferior-octave-output-string nil
inferior-octave-receive-in-progress t) (while
inferior-octave-receive-in-progress (accept-process-output
inferior-octave-process)) (goto-char (point-max)) (set-marker
(process-mark proc) (point)) (insert-before-markers (concat ... ...))
(inferior-octave-send-list-and-digest (list "PS2\n")) (if (string-match
"^PS2 = *$" ...) (inferior-octave-send-list-and-digest ...)) (let*
(commands ... ...) (setq commands ...)
(inferior-octave-send-list-and-digest commands)) (insert-before-markers
(concat ... inferior-octave-output-string))
(inferior-octave-send-list-and-digest (list "exist
\"completion_matches\"\n")) (setq inferior-octave-complete-impossible
(not ...)) (set-process-filter proc (quote
inferior-octave-output-filter)) (run-hooks (quote
inferior-octave-startup-hook)) (inferior-octave-resync-dirs))
inferior-octave-startup()
(save-excursion (set-buffer buffer) (comint-mode)
(inferior-octave-startup) (inferior-octave-mode))
(if (comint-check-proc buffer) nil (save-excursion (set-buffer
buffer) (comint-mode) (inferior-octave-startup) (inferior-octave-mode)))
(let ((buffer inferior-octave-buffer)) (get-buffer-create buffer) (if
(comint-check-proc buffer) nil (save-excursion ... ... ... ...)) (if
(not arg) (pop-to-buffer buffer)))
inferior-octave(t)
octave-send-region(38 38)
octave-send-line(nil)
* call-interactively(octave-send-line)
- error from octave-inf: inferior-octave-resync-dirs,
Gerd Bürger <=