Updated announceEmail.pl

[clearscm.git] / bin / tunnel.pl

diff --git a/bin/tunnel.pl b/bin/tunnel.pl
index 43dbfff..084f661 100755 (executable)
--- a/bin/tunnel.pl
+++ b/bin/tunnel.pl
@@ -71,6 +71,8 @@ use Logger;
 use Speak;
 use Utils;
 
+local $0 = $FindBin::Script;
+
 my $VERSION  = '$Revision: 1.0 $';
   ($VERSION) = ($VERSION =~ /\$Revision: (.*) /);