From 1980462a73fe3a14acc44c9a75982d8b15e9390c Mon Sep 17 00:00:00 2001 From: minima Date: Tue, 21 Jan 2003 10:54:20 +0000 Subject: [PATCH] add Agent --- perl/Log/Agent.pm | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 perl/Log/Agent.pm diff --git a/perl/Log/Agent.pm b/perl/Log/Agent.pm new file mode 100644 index 00000000..7af5bb9f --- /dev/null +++ b/perl/Log/Agent.pm @@ -0,0 +1,28 @@ +# +# Dummy Log Agent +# +# This is just for the benefit of Storable on 5.8.0 +# +# Copyright (c) Dirk Koopman +# +# $Id$ +# + +package Log::Agent; + +use DXDebug; + +$VERSION = 0.3; +@ISA = qw(Exporter); +@EXPORT = qw(logcroak logcarp); + +sub logcroak +{ + DXDebug::croak(@_); +} + +sub logcarp +{ + DXDebug::carp(@_); +} +1; -- 2.34.1