#! /bin/sh -e
## 02_wish.dpatch
## Sergei Golovan <sgolovan@debian.org>

patch_opts="${patch_opts:--f --no-backup-if-mismatch ${2:+-d $2}}"

if [ $# -ne 1 ]; then
    echo >&2 "`basename $0`: script expects -patch|-unpatch as argument"
    exit 1
fi
case "$1" in
	-patch) patch $patch_opts -p1 < $0;;
	-unpatch) patch $patch_opts -R -p1 < $0;;
	*)
		echo >&2 "`basename $0`: script expects -patch|-unpatch as argument"
		exit 1;;
esac
 
exit 0

@DPATCH@
diff -ru redet.orig/redet.tcl redet/redet.tcl
--- redet.orig/redet.tcl
+++ redet/redet.tcl
@@ -1,7 +1,7 @@
 #!/bin/sh
 #-*- mode: Tcl;time-stamp-start:"TimeStamp[ 	]+\\\\?[\"<]+";-*-
 # the next line restarts using wish \
-exec wish $0 -- $@
+exec wish8.5 $0 -- $@
 set TimeStamp "2008-09-11 20:14:21 poser"
 #
 # Copyright (C) 2003-2008 William J. Poser (billposer@alum.mit.edu)