summaryrefslogtreecommitdiffstats
path: root/contrib/fix_comment_text.pl
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/fix_comment_text.pl')
-rwxr-xr-xcontrib/fix_comment_text.pl75
1 files changed, 0 insertions, 75 deletions
diff --git a/contrib/fix_comment_text.pl b/contrib/fix_comment_text.pl
deleted file mode 100755
index f17bbc3d4..000000000
--- a/contrib/fix_comment_text.pl
+++ /dev/null
@@ -1,75 +0,0 @@
-#!/usr/bin/perl
-# -*- 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 Initial Developer of the Original Code is Mozilla Foundation
-# Portions created by the Initial Developer are Copyright (C) 2011 the
-# Initial Developer. All Rights Reserved.
-#
-#===============================================================================
-#
-# FILE: fix_comment_text.pl
-#
-# USAGE: ./fix_comment_text.pl <comment_id>
-#
-# DESCRIPTION: Updates a comment in Bugzilla with the text after __DATA__
-#
-# OPTIONS: <comment_id> - The comment id from longdescs with the comment
-# to be replaced.
-# REQUIREMENTS: ---
-# BUGS: ---
-# NOTES: ---
-# AUTHOR: David Lawrence (:dkl), dkl@mozilla.com
-# COMPANY: Mozilla Foundation
-# VERSION: 1.0
-# CREATED: 06/20/2011 03:40:22 PM
-# REVISION: ---
-#===============================================================================
-
-use strict;
-use warnings;
-
-use lib ".";
-
-use Bugzilla;
-use Bugzilla::Util qw(detaint_natural);
-
-my $comment_id = shift;
-
-if (!detaint_natural($comment_id)) {
- print "Error: invalid comment id or comment id not provided.\n" .
- "Usage: ./fix_comment_text.pl <comment_id>\n";
- exit(1);
-}
-
-my $dbh = Bugzilla->dbh;
-
-my $comment = join("", <DATA>);
-
-if ($comment =~ /ENTER NEW COMMENT TEXT HERE/) {
- print "Please enter the new comment text in the script " .
- "after the __DATA__ marker.\n";
- exit(1);
-}
-
-$dbh->bz_start_transaction;
-
-Bugzilla->dbh->do(
- "UPDATE longdescs SET thetext = ? WHERE comment_id = ?",
- undef, $comment, $comment_id);
-
-$dbh->bz_commit_transaction;
-
-exit(0);
-
-__DATA__
-ENTER NEW COMMENT TEXT HERE BELOW THE __DATA__ MARKER!