Masatake YAMATO <[EMAIL PROTECTED]> writes:
>
> Could you do the same after evaluating:
>
> (setq tla--name-read-debug t)
>
> and send the backtrace again?
>
Sure:
completing-read("Import `~/prj/doc/xc/' to: " tla--name-read-complete nil nil
"[EMAIL PROTECTED]/" tla--name-read-history)
(setq result (completing-read (or prompt "Location: ") (quote
tla--name-read-complete) nil nil result (quote tla--name-read-history))
first-try nil)
(while (or first-try not-finished too-long last-empty) (unless first-try
(unless ... ... ... ... ...)) (setq result (completing-read ... ... nil nil
result ...) first-try nil) (setq not-finished (tla--prompt-not-finished result
archive category branch version revision)) (setq too-long (tla--prompt-too-long
result archive category branch version revision)) (setq last-empty
(tla--prompt-last-empty result)))
(let* ((dummy-nouse ...) (minibuffer-local-completion-map
tla--name-read-minibuf-map) (result ...) (first-try t) not-finished too-long
last-empty) (while (or first-try not-finished too-long last-empty) (unless
first-try ...) (setq result ... first-try nil) (setq not-finished ...) (setq
too-long ...) (setq last-empty ...)) (when result (setq result ...))
(run-hook-with-args (quote tla-name-read-final-hook) result) result)
tla--name-read-internal("Import `~/prj/doc/xc/' to: " "[EMAIL PROTECTED]"
prompt prompt prompt nil)
(if tla--name-read-debug (tla--name-read-internal prompt archive category
branch version revision) (condition-case reason (tla--name-read-internal prompt
archive category branch version revision) (... ... ...)))
(let ((tla--name-read-arguments ...)) (if tla--name-read-debug
(tla--name-read-internal prompt archive category branch version revision)
(condition-case reason ... ...)))
tla-name-read("Import `~/prj/doc/xc/' to: " "[EMAIL PROTECTED]" prompt prompt
prompt)
(let* ((base ...) (l ...) (project ...)) (let (...) (tla--run-tla-sync ...)
(tla--run-tla-async ... :finished ...)))
tla-start-project()
call-interactively(tla-start-project)
execute-extended-command(nil)
call-interactively(execute-extended-command)
Hope this helps... i must go sleep soon, but i'll try to follow
Matthieu's advice in his last email tomorrow (unless you succeed
before i wake, that is :)
Thanks!
jao
--
"When you come to a fork in the road, take it"
-Yogi Berra, baseball coach.
