examples/tclspice, cleanup "wish" trampoline and add emacs mode specification

examples/tclspice/tcl-testbench1/tcl-testbench1.sh

@@ -1,7 +1,6 @@
 #!/bin/sh
-# WishFix \
+# -*- mode: tcl -*- \
         exec wish -f "$0" ${1+"$@"}
-	###
 
 # old name:  analyse-20070504-0.tcl
 package require BLT

examples/tclspice/tcl-testbench2/tcl-testbench2.sh

@@ -1,7 +1,6 @@
 #!/bin/sh
-# WishFix \
+# -*- mode: tcl -*- \
 	exec wish -f "$0" ${1+"$@"}
-###
 
 package require BLT
 load ../../../src/.libs/libspice.so

examples/tclspice/tcl-testbench3/tcl-testbench3.sh

@@ -1,7 +1,6 @@
 #!/bin/sh
-# WishFix \
+# -*- mode: tcl -*- \
         exec wish -f "$0" ${1+"$@"}
-	###
 
 package require BLT
 load ../../../src/.libs/libspice.so

examples/tclspice/tcl-testbench4/tcl-testbench4.sh

@@ -1,4 +1,3 @@
 #!/bin/sh
-# WishFix \
-	exec wish vspicechart.tcl example.cir
-###
+
+exec wish vspicechart.tcl example.cir

examples/tclspice/tcl/test_vectoblt.sh

@@ -1,7 +1,6 @@
 #!/bin/sh
-# WishFix \
+# -*- mode: tcl -*- \
         exec wish -f "$0" ${1+"$@"}
-        ###
 
 package require BLT
 load ../../../src/.libs/libspice.so