quickmsg

[www.jankratochvil.net.git] / Redirect.pl

diff --git a/redirect.pl b/Redirect.pl
similarity index 98%
rename from redirect.pl
rename to Redirect.pl
index 59acbe5..6b51f62 100755 (executable)
--- a/redirect.pl
+++ b/Redirect.pl
@@ -18,6 +18,7 @@
 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
 
+package Redirect;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
 use vars qw($VERSION $CVS_ID);
 $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };