Hi!
Adding partners in the *tla-book-marks* buffer does no longer work for
me.
(tla--name-read "Version: " 'prompt 'prompt 'prompt 'prompt)
returns nil, without asking me a question, therefore I cannot
add a partner at the moment.
Does it work for anybody else?
Stefan.
(defun tla-bookmarks-add-partner-interactive ()
"Adds a partner to the current or marked bookmarks"
(interactive)
(let ((bookmarks (or tla-bookmarks-marked-list
(list (ewoc-data (ewoc-locate
tla-bookmarks-cookie)))))
(partner (tla--name-construct
(tla--name-read "Version: "
'prompt 'prompt 'prompt 'prompt))))
(dolist (bookmark bookmarks)
(tla-bookmarks-add-partner bookmark partner t))
(tla-bookmarks-save-to-file)
(save-window-excursion
(tla-bookmarks))))
