12 lines
342 B
Plaintext
12 lines
342 B
Plaintext
--- X-Files.tcl.orig Thu Dec 18 13:24:33 1997
|
|
+++ X-Files.tcl Sun Apr 19 13:22:27 1998
|
|
@@ -1,3 +1,8 @@
|
|
+#!/bin/sh
|
|
+# The main file for the X-Files
|
|
+# The next line is executed by /bin/sh, but not Tcl \
|
|
+exec wish8.2 $0 ${1+"$@"}
|
|
+set xf(xf_home) "@X11BASE@/lib/X11/X-Files/"
|
|
proc MAIN {argc argv} {
|
|
global xf xf_image env menu tk_version
|
|
|