Acutally use the env var for debug port

flightaware · Apr 23, 2019 · 3860573 · 3860573
1 parent 295c6a6
commit 3860573
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bin/remote_debug_wrapper b/bin/remote_debug_wrapper
@@ -10,7 +10,7 @@ package require remotedebug 2.0
 
 set port 2345
 if { [info exists ::env(TCLPRO_DEBUG_PORT)] } {
-    set port 2345
+    set port $::env(TCLPRO_DEBUG_PORT)
 }
 
 puts stderr "Listening for connections on $port"