summaryrefslogtreecommitdiffstats
path: root/Bugzilla/Bug.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Bugzilla/Bug.pm')
-rwxr-xr-xBugzilla/Bug.pm15
1 files changed, 15 insertions, 0 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;