summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xBugzilla/Bug.pm15
-rw-r--r--CGI.pl10
-rwxr-xr-xattachment.cgi1
3 files changed, 16 insertions, 10 deletions
diff --git a/Bugzilla/Bug.pm b/Bugzilla/Bug.pm
index b2261e1ee..b9229d98e 100755
--- a/Bugzilla/Bug.pm
+++ b/Bugzilla/Bug.pm
@@ -44,6 +44,13 @@ use Bugzilla::User;
use Bugzilla::Util;
use Bugzilla::Error;
+use base qw(Exporter);
+@Bugzilla::Bug::EXPORT = qw(
+ ValidateComment
+);
+
+use constant MAX_COMMENT_LENGTH => 65535;
+
sub fields {
# Keep this ordering in sync with bugzilla.dtd
my @fields = qw(bug_id alias creation_ts short_desc delta_ts
@@ -585,6 +592,14 @@ sub CountOpenDependencies {
return @dependencies;
}
+sub ValidateComment ($) {
+ my ($comment) = @_;
+
+ if (defined($comment) && length($comment) > MAX_COMMENT_LENGTH) {
+ ThrowUserError("comment_too_long");
+ }
+}
+
sub AUTOLOAD {
use vars qw($AUTOLOAD);
my $attr = $AUTOLOAD;
diff --git a/CGI.pl b/CGI.pl
index d650ea08e..652d6c03b 100644
--- a/CGI.pl
+++ b/CGI.pl
@@ -188,16 +188,6 @@ sub ValidateBugID {
}
}
-sub ValidateComment {
- # Make sure a comment is not too large (greater than 64K).
-
- my ($comment) = @_;
-
- if (defined($comment) && length($comment) > 65535) {
- ThrowUserError("comment_too_long");
- }
-}
-
sub PasswordForLogin {
my ($login) = (@_);
SendSQL("select cryptpassword from profiles where login_name = " .
diff --git a/attachment.cgi b/attachment.cgi
index 92d127e1a..64e30f64a 100755
--- a/attachment.cgi
+++ b/attachment.cgi
@@ -48,6 +48,7 @@ use Bugzilla::Flag;
use Bugzilla::FlagType;
use Bugzilla::User;
use Bugzilla::Util;
+use Bugzilla::Bug;
# Check whether or not the user is logged in and, if so, set the $::userid
Bugzilla->login();