--- a/Makefile	Sun Mar 01 15:31:29 2009 +0100
+++ b/Makefile	Sun Mar 01 15:43:03 2009 +0100
@@ -17,7 +17,7 @@
 %:	%.pl
 	perl -c $<
 	cp -f $< $@
-	perl -i -pe 's/^<VERSION>/join "", map{s{^}{\t}; $$_}`hg parents`/e' $@
+	perl -i -pe 's/<VERSION>/`hg id -it`/e' $@
 	chmod a+x-w $@
 
 %.gz:	%

--- a/tele-watch.pl	Sun Mar 01 15:31:29 2009 +0100
+++ b/tele-watch.pl	Sun Mar 01 15:43:03 2009 +0100
@@ -32,7 +32,7 @@
 use POSIX qw(setsid);
 
 my $ME      = basename $0;
-my $VERSION = "0.1";
+my $VERSION = "<VERSION>";
 
 my $opt_block   = 1;
 my $opt_daemon  = 1;
@@ -385,8 +385,7 @@
 
 =head1 VERSION
 
-<VERSION>
-
+This is <VERSION>.
 
 =cut