> (tla--name-read "Version: " 'prompt 'prompt 'prompt 'prompt)
> returns nil, without asking me a question, therefore I cannot
> add a partner at the moment.
I think I introduce this bug.
I guess functions connected to tla-name-read-init-hook, a hook
run at the beginning of tla--name-read, raise an error.
It is difficult to know the error because condition-case
is used in tla--name-read:
(defun tla--name-read (&optional prompt archive category
branch version revision)
...
(condition-case nil
...
((quit error)
(run-hooks 'tla-name-read-error-hook)
nil)
))
So please remove
(condition-case nil
and
((quit error)
(run-hooks 'tla-name-read-error-hook)
nil)
; and evaluate tla--name-read; and call
`tla-bookmarks-add-partner-interactive' or eval
(tla--name-read "Version: " 'prompt 'prompt 'prompt 'prompt) again?
You will get the error.