X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=lib%2Fperl%2FLog.pm;h=7c4f3a10a81f9077d90e74618c139026ce58b823;hb=78775c3f5e38e8bee7d04b0f994766c7dd1e6578;hp=68b1d3724cb181c70623088c5776e117b67d2e6b;hpb=997658b144998f1ab23b8d2c64bdc3ca93bae2c0;p=libucw.git

diff --git a/lib/perl/Log.pm b/lib/perl/Log.pm
index 68b1d372..7c4f3a10 100644
--- a/lib/perl/Log.pm
+++ b/lib/perl/Log.pm
@@ -10,6 +10,13 @@ use lib 'lib/perl5';
 use strict;
 use warnings;
 use POSIX;
+use Exporter;
+
+our $version = 1.0;
+our @ISA = qw(Exporter);
+our @EXPORT = ();
+our %EXPORT_TAGS = ( all => [qw(&Log &Die)]);
+our @EXPORT_OK = (@{$EXPORT_TAGS{'all'}});
 
 my $Prog = (reverse split(/\//, $0))[0];