summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Bugzilla/RelationSet.pm14
-rw-r--r--RelationSet.pm14
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 {