diff --git a/tests/xschemtest.tcl b/tests/xschemtest.tcl
index 90d659be..0286fa71 100644
--- a/tests/xschemtest.tcl
+++ b/tests/xschemtest.tcl
@@ -185,7 +185,6 @@ proc netlist_test {} {
 }
 
 proc xschemtest {{view 0}} {
-  global tclstop netlist_dir OS XSCHEM_SHAREDIR show_pin_net_names
   set t [time {
     ## make sure ERC window wil not pop up above schematic while doing tests
     wm deiconify .infotext