view tests/test-clone @ 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 a
cd a
hg init
echo a > a
hg add a
hg commit -m test -d '0 0'

# Default operation
hg clone . ../b
cd ../b
cat a
hg verify

# No update
hg clone -U . ../c
cd ../c
cat a
hg verify

# Default destination
mkdir ../d
cd ../d
hg clone ../a
cd a
hg cat a