view tests/test-undo @ 1340:faa62c7685fb

hgk is a wish script

--- mercurial-0.7.orig/contrib/hgk	2005-09-23 11:02:21.000000000 +0200
+++ mercurial-0.7/contrib/hgk	2005-09-23 11:07:57.000000000 +0200
@@ -1,6 +1,4 @@
-#!/bin/sh
-# Tcl ignores the next line -*- tcl -*- \
-exec wish "$0" -- "${1+$@}"
+#!/usr/bin/wish

 # Copyright (C) 2005 Paul Mackerras.  All rights reserved.
 # This program is free software; it may be used, copied, modified

#!/bin/sh

mkdir t
cd t
hg init
echo a > a
hg add a
hg commit -m "test" -d "0 0"
hg verify
hg parents
hg status
hg undo
hg verify
hg parents
hg status