diff options
author | endico%mozilla.org <> | 2000-06-13 16:45:12 +0000 |
---|---|---|
committer | endico%mozilla.org <> | 2000-06-13 16:45:12 +0000 |
commit | 09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef (patch) | |
tree | f69d263040ee4af89b6e27f21013083f739fe4d7 | |
parent | 2559a21d73e911e69420b98e85740a894a3973d7 (diff) | |
download | bugs-09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef.tar bugs-09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef.tar.gz bugs-09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef.tar.bz2 bugs-09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef.tar.xz bugs-09ac5d13cfe25f44900eb8c6c4f4eefb3be385ef.zip |
adding toArrayOfStrings subroutine needed by Bug.pm
-rw-r--r-- | Bugzilla/RelationSet.pm | 14 | ||||
-rw-r--r-- | RelationSet.pm | 14 |
2 files changed, 28 insertions, 0 deletions
diff --git a/Bugzilla/RelationSet.pm b/Bugzilla/RelationSet.pm index ee402e7a4..92e2158f2 100644 --- a/Bugzilla/RelationSet.pm +++ b/Bugzilla/RelationSet.pm @@ -196,6 +196,20 @@ sub toArray { return keys(%$self); } +# return this set as an array of strings +# +sub toArrayOfStrings { + ($#_ == 0) || confess("invalid number of arguments"); + my $self = shift(); + + my @result = (); + foreach my $i ( keys %$self ) { + push @result, &::DBID_to_name($i); + } + + return sort(@result); +} + # return this set in string form (comma-separated and sorted) # sub toString { diff --git a/RelationSet.pm b/RelationSet.pm index ee402e7a4..92e2158f2 100644 --- a/RelationSet.pm +++ b/RelationSet.pm @@ -196,6 +196,20 @@ sub toArray { return keys(%$self); } +# return this set as an array of strings +# +sub toArrayOfStrings { + ($#_ == 0) || confess("invalid number of arguments"); + my $self = shift(); + + my @result = (); + foreach my $i ( keys %$self ) { + push @result, &::DBID_to_name($i); + } + + return sort(@result); +} + # return this set in string form (comma-separated and sorted) # sub toString { |