We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent f5085b7 commit d6293f9Copy full SHA for d6293f9
elisp/log4slime.el
@@ -259,7 +259,9 @@ argument, the parent effective log level (string)")
259
"Wrapper around `slime-eval' that ignores errors on the lisp side"
260
(when (log4slime-check-connection)
261
;; I swear it something in slime-eval screws with point sometimes
262
- (save-excursion (slime-eval `(cl:ignore-errors ,form)))))
+ (save-excursion
263
+ (let ((slime-current-thread t))
264
+ (slime-eval `(cl:ignore-errors ,form))))))
265
266
(defvar log4slime-goto-definition-window nil
267
"Passed as WHERE to `slime-pop-to-location', can be 'WINDOW or 'FRAME too")
0 commit comments