summaryrefslogtreecommitdiffstats
path: root/globals.pl
diff options
context:
space:
mode:
authordmose%mozilla.org <>2000-03-29 07:30:23 +0200
committerdmose%mozilla.org <>2000-03-29 07:30:23 +0200
commita48e37063734dd5748433a0dd8a9c8e2b32e41c0 (patch)
tree7e3b6813ea24a0c63aaa6de3767822e8c104c97e /globals.pl
parent5bfbabbd77763c4520a5dab66015ed0c2bf7693c (diff)
downloadbugzilla-a48e37063734dd5748433a0dd8a9c8e2b32e41c0.tar.gz
bugzilla-a48e37063734dd5748433a0dd8a9c8e2b32e41c0.tar.xz
allow users to watch the bugs of other users
Diffstat (limited to 'globals.pl')
-rw-r--r--globals.pl27
1 files changed, 8 insertions, 19 deletions
diff --git a/globals.pl b/globals.pl
index c870082c6..58eb7738c 100644
--- a/globals.pl
+++ b/globals.pl
@@ -18,6 +18,7 @@
# Rights Reserved.
#
# Contributor(s): Terry Weissman <terry@mozilla.org>
+# Dan Mosedale <dmose@mozilla.org>
# Contains some global variables and routines used throughout bugzilla.
@@ -65,6 +66,7 @@ use Mysql;
use Date::Format; # For time2str().
use Date::Parse; # For str2time().
# use Carp; # for confess
+use RelationSet;
# Contains the version string for the current running Bugzilla.
$::param{'version'} = '2.9';
@@ -118,9 +120,6 @@ sub SqlLog {
}
}
-
-
-
sub SendSQL {
my ($str, $dontshadow) = (@_);
my $iswrite = ($str =~ /^(INSERT|REPLACE|UPDATE|DELETE)/i);
@@ -756,23 +755,13 @@ sub GetLongDescriptionAsHTML {
}
sub ShowCcList {
- my ($num) = (@_);
- my @ccids;
- my @row;
- SendSQL("select who from cc where bug_id = $num");
- while (@row = FetchSQLData()) {
- push(@ccids, $row[0]);
- }
- my @result = ();
- foreach my $i (@ccids) {
- push @result, DBID_to_name($i);
- }
-
- return join(',', @result);
+ my ($num) = (@_);
+
+ my $ccSet = new RelationSet();
+ $ccSet->mergeFromDB("select who from cc where bug_id=$num");
+ return $ccSet->toString();
}
-
-
# Fills in a hashtable with info about the columns for the given table in the
# database. The hashtable has the following entries:
# -list- the list of column names
@@ -903,7 +892,7 @@ sub RemoveVotes {
}
-sub Param {
+sub Param ($) {
my ($value) = (@_);
if (defined $::param{$value}) {
return $::param{$value};