[Bps-public-commit] net-lighthouse branch, master, updated. 67655e60c237490985a64625f0967efcc3e1d2ab
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Fri Sep 4 04:49:07 EDT 2009
The branch, master has been updated
via 67655e60c237490985a64625f0967efcc3e1d2ab (commit)
from 3d1ca3f8a550a07b1bd96bf4fc374047c797609d (commit)
Summary of changes:
lib/Net/Lighthouse/Project.pm | 13 +++++++------
1 files changed, 7 insertions(+), 6 deletions(-)
- Log -----------------------------------------------------------------
commit 67655e60c237490985a64625f0967efcc3e1d2ab
Author: sunnavy <sunnavy at bestpractical.com>
Date: Fri Sep 4 16:49:03 2009 +0800
transfer @_ in project->tickets(@_) to ticket->list() as args
diff --git a/lib/Net/Lighthouse/Project.pm b/lib/Net/Lighthouse/Project.pm
index 85bfa39..07abd08 100644
--- a/lib/Net/Lighthouse/Project.pm
+++ b/lib/Net/Lighthouse/Project.pm
@@ -237,11 +237,11 @@ sub initial_state {
}
}
-sub tickets { return shift->_list( 'Ticket' ) }
-sub ticket_bins { return shift->_list( 'TicketBin' ) }
-sub messages { return shift->_list( 'Message' ) }
-sub milestones { return shift->_list( 'Milestone' ) }
-sub changesets { return shift->_list( 'Changeset' ) }
+sub tickets { return shift->_list( 'Ticket', @_ ) }
+sub ticket_bins { return shift->_list( 'TicketBin', @_ ) }
+sub messages { return shift->_list( 'Message', @_ ) }
+sub milestones { return shift->_list( 'Milestone', @_ ) }
+sub changesets { return shift->_list( 'Changeset', @_ ) }
sub ticket { return shift->_new( 'Ticket' ) }
sub ticket_bin { return shift->_new( 'TicketBin' ) }
@@ -274,7 +274,8 @@ sub _list {
{
type => SCALAR,
regex => qr/^(TicketBin|Ticket|Message|Changeset|Milestone)$/,
- }
+ },
+ (0)x(@_-1)
);
my $class = 'Net::Lighthouse::Project::' . shift;
my $object = $class->new(
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list