(defun* Omake.Error.error-string (e &key full-text)
"Create a clickable string where clicking evaluates the error."
(assert (Omake.Error.is e))
- ;; Use lexical-let so we can put the error in a closure
+ ;; We don't seem to be able to close over e with lexical-let*,
- (e e) ;; !!! close on e !!!
- (Omake.Model.eval-error e)))
+ (goto-error `(lambda ()
+ (Omake.Model.eval-error ,e)))
(_ (define-key goto-keymap [mouse-1] goto-error))
(_ (define-key goto-keymap "\C-m" goto-error))