Fix #132 quick jump should create and/or focus the tab

flow-storm · Jan 27, 2024 · 2e1496c · 2e1496c
1 parent cbd0199
commit 2e1496c
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -21,6 +21,7 @@
 ### Bugs fixed
 
     - Pasting in quick jump box doesn't fire autocomplete
+    - Quick jump should create and/or focus the tab
 
 ## 3.9.1 (12-01-2024)
 

diff --git a/src-dbg/flow_storm/debugger/ui/flows/screen.clj b/src-dbg/flow_storm/debugger/ui/flows/screen.clj
@@ -225,7 +225,9 @@
                              [ev]
                               (clean-objs flow-id thread-id)))
         (-> all-tabs
-            (.addAll [thread-tab]))))))
+            (.addAll [thread-tab]))
+
+        (.select ^SingleSelectionModel sel-model ^Tab thread-tab)))))
 
 (defn select-flow-tab [flow-id]
   (let [[flows-tabs-pane] (obj-lookup "flows_tabs_pane")