From c148b68369373a4cedfc74472bd1357753e6c719 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Sat, 31 Oct 2009 21:12:58 -0500 Subject: oops, why did i remove this --- lib/Bot/Games.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/lib/Bot/Games.pm b/lib/Bot/Games.pm index 8e0338d..f306b52 100644 --- a/lib/Bot/Games.pm +++ b/lib/Bot/Games.pm @@ -98,6 +98,16 @@ sub BUILD { $self->_ime; } +sub _check_required { + my $self = shift; + my @attrs = @_; + my $protocol = $self->protocol; + for my $attr (@attrs) { + die "Protocol $protocol requires option $attr to be set" + unless defined $self->$attr; + } +} + sub _build_credentials { my $self = shift; my $protocol = $self->protocol; -- cgit v1.2.3