123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263 |
- #!/usr/bin/env perl -wT
- # -*- Mode: perl; indent-tabs-mode: nil -*-
- #
- # The contents of this file are subject to the Mozilla Public
- # License Version 1.1 (the "License"); you may not use this file
- # except in compliance with the License. You may obtain a copy of
- # the License at http://www.mozilla.org/MPL/
- #
- # Software distributed under the License is distributed on an "AS
- # IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
- # implied. See the License for the specific language governing
- # rights and limitations under the License.
- #
- # The Original Code is the Bugzilla Bug Tracking System.
- #
- # The Initial Developer of the Original Code is Netscape Communications
- # Corporation. Portions created by Netscape are
- # Copyright (C) 1998 Netscape Communications Corporation. All
- # Rights Reserved.
- #
- # Contributor(s): Terry Weissman <terry@mozilla.org>
- # Myk Melez <myk@mozilla.org>
- # Gervase Markham <gerv@gerv.net>
- use strict;
- use lib qw(. lib);
- use Bugzilla;
- use Bugzilla::Error;
- use Bugzilla::Bug;
- my $cgi = Bugzilla->cgi;
- my $template = Bugzilla->template;
- my $vars = {};
- ###############################################################################
- # Begin Data/Security Validation
- ###############################################################################
- # Check whether or not the user is currently logged in.
- Bugzilla->login();
- # Make sure the bug ID is a positive integer representing an existing
- # bug that the user is authorized to access.
- my $bug_id = $cgi->param('id');
- ValidateBugID($bug_id);
- ###############################################################################
- # End Data/Security Validation
- ###############################################################################
- ($vars->{'operations'}, $vars->{'incomplete_data'}) =
- Bugzilla::Bug::GetBugActivity($bug_id);
- $vars->{'bug'} = new Bugzilla::Bug($bug_id);
- print $cgi->header();
- $template->process("bug/activity/show.html.tmpl", $vars)
- || ThrowTemplateError($template->error());
|