aboutsummaryrefslogtreecommitdiffstats
path: root/l/src/main.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'l/src/main.lisp')
-rw-r--r--l/src/main.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/l/src/main.lisp b/l/src/main.lisp
index 9eaa8e3..61a48be 100644
--- a/l/src/main.lisp
+++ b/l/src/main.lisp
@@ -78,7 +78,7 @@
"sessionId")))
;; Failed to reload tab.
- (when (jsown:keyp (json-obj-get response "result") "exceptionDetails")
+ (when (runtime-evaluate-exception-p response)
;; `reload-tab` adds an extra increment to the wait group. If the call
;; fails, we only receive one message instead of two, so the wait group
;; must be decremented to match.