"Jose A. Ortega Ruiz" <[EMAIL PROTECTED]> writes:
> [Sole completion]
>
> (after the cursor, which is after the /)
What you describe should not happen with the current code.
1) if you have a byte-compiled xtla in the way, make sure it is
up-to-date, or delete the .elc files.
2) Check that the code of tla-start-project looks like
(defun tla-start-project (&optional archive)
"Start a new project.
Prompts for the root directory of the project and the fully
qualified version name to use. Sets up and imports the tree and
displays an inventory buffer to allow the project's files to be
added and committed.
If ARCHIVE is given, use it when reading version.
Return a cons pair: its car is the new version name string, and
its cdr is imported location."
(interactive)
(let* ((base (tla--read-directory-name "Directory containing files to import:
"
(or default-directory
(getenv "HOME"))))
(l (tla-name-read (format "Import `%s' to: " base)
(if archive archive (tla-my-default-archive))
'prompt 'prompt 'prompt))
(project (if (< 1 (count nil l))
(error "Need a fully qualified version name")
(tla--name-construct l))))
(let ((default-directory (file-name-as-directory base)))
(tla--run-tla-sync (list "init-tree" project))
(tla--run-tla-sync (list "import" "--setup"))
(tla-inventory base t)
(cons project default-directory))))
3) If this all didn't solve your problem, try this:
a) M-x set-variable RET debug-on-quit RET
b) M-x eval-buffer RET (both in xtla.el and xtla-core.el)
c) M-x tla-start-project RET /path/to/project RET
[you're prompted for an archive name]
d) C-g
e) Post the backtrace here.
--
Matthieu
