--- a/samples/tablescreen.tcl
+++ b/samples/tablescreen.tcl
@@ -1,19 +1,4 @@
-#!/bin/sh
-# @(#$Id$  
-# Generate a standard access screen from all a table's columns
-
-# The following nonsense is required because mysqlwish dumps core when 
-# SQLDBTYPE is ODBC, reason unknown.
-# The following lines are executed by sh, not by wish because of the
-# backslashes... Puke loudly
-#\
-case "A$SQLDBTYPE" in 
-#\
-  A|AMYSQL) exec /usr/local/bin/mysqlwish "$0" "$@";;
-#\
-*) exec wish "$0" "$@";; 
-#\
-esac
+#!/usr/bin/env wish
 
 package require sqlsc