From 9b472795d26cd93d1bb58488ef60a062f5237295 Mon Sep 17 00:00:00 2001 From: Janik Kleinhoff Date: Thu, 24 Sep 2015 01:32:11 +0000 Subject: Rework module paths --- Net/IRC/EventQueue/Entry.pm | 40 ---------------------------------------- 1 file changed, 40 deletions(-) delete mode 100644 Net/IRC/EventQueue/Entry.pm (limited to 'Net/IRC/EventQueue/Entry.pm') diff --git a/Net/IRC/EventQueue/Entry.pm b/Net/IRC/EventQueue/Entry.pm deleted file mode 100644 index 94a3802..0000000 --- a/Net/IRC/EventQueue/Entry.pm +++ /dev/null @@ -1,40 +0,0 @@ -package Net::IRC::EventQueue::Entry; - -use strict; - -my $id = 0; - -sub new { - my $class = shift; - my $time = shift; - my $content = shift; - - my $self = { - 'time' => $time, - 'content' => $content, - 'id' => "$time:" . $id++, - }; - - bless $self, $class; - return $self; -} - -sub id { - my $self = shift; - return $self->{'id'}; -} - -sub time { - my $self = shift; - $self->{'time'} = $_[0] if @_; - return $self->{'time'}; -} - -sub content { - my $self = shift; - $self->{'content'} = $_[0] if @_; - return $self->{'content'}; -} - -1; - -- cgit v1.2.3