From: Justin Hunter Date: Sat, 16 Jan 2010 17:00:46 +0000 (-0700) Subject: no more wantarray X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5b7d1de74d72f3946dc4454806ece831a16f3031;p=dbsrgits%2FSQL-Translator-2.0-ish.git no more wantarray --- diff --git a/lib/SQL/Translator/Object/Procedure.pm b/lib/SQL/Translator/Object/Procedure.pm index 587b6b3..2674e60 100644 --- a/lib/SQL/Translator/Object/Procedure.pm +++ b/lib/SQL/Translator/Object/Procedure.pm @@ -42,5 +42,5 @@ class SQL::Translator::Object::Procedure extends SQL::Translator::Object { multi method parameters(Str $parameter) { $self->add_parameter($parameter) } multi method parameters(ArrayRef $parameter) { $self->add_parameter($parameter) } - multi method parameters { wantarray ? $self->_parameters : $self->_parameters } + multi method parameters { $self->_parameters } } diff --git a/lib/SQL/Translator/Object/Trigger.pm b/lib/SQL/Translator/Object/Trigger.pm index 6d869ce..bbea4dc 100644 --- a/lib/SQL/Translator/Object/Trigger.pm +++ b/lib/SQL/Translator/Object/Trigger.pm @@ -71,5 +71,5 @@ class SQL::Translator::Object::Trigger extends SQL::Translator::Object { multi method database_events(Str $database_event) { $self->add_database_event($database_event); $self->database_events } multi method database_events(ArrayRef $database_events) { $self->add_database_event($_) for @$database_events; $self->database_events } - multi method database_events { wantarray ? $self->_database_events : $self->_database_events } + multi method database_events { $self->_database_events } }