From 2305567d52a804919bd0c200e160f79309430442 Mon Sep 17 00:00:00 2001 From: Ralf Ertzinger Date: Mon, 12 Jan 2009 21:33:14 +0100 Subject: [PATCH] - Add fallback functions --- xmlrtorrent/TalkerBase.pm | 25 +++++++++++++++++++++++-- 1 file changed, 23 insertions(+), 2 deletions(-) diff --git a/xmlrtorrent/TalkerBase.pm b/xmlrtorrent/TalkerBase.pm index d1fa7c8..d259b81 100644 --- a/xmlrtorrent/TalkerBase.pm +++ b/xmlrtorrent/TalkerBase.pm @@ -12,9 +12,30 @@ sub new { my $self = $class->SUPER::new(); $self = {%{$self}, - TYPE => 'talker', - }; + TYPE => 'talker', + '__ERROR' => ''; + }; return bless($self, $class); } +sub load_start { + my $self = shift; + + $self->error("TalkerBase::load_start called, this should never happen!"); + return undef; +} + +sub send_request { + my $self = shift; + + $self->error("TalkerBase::send_request called, this should never happen!"); + return undef; +} + +sub errstr { + my $self = shift; + + return $self->{'__ERROR'}; +} + 1; -- 1.8.3.1