sub GetBugLink {
my ($bug_num, $link_text, $comment_num) = @_;
- $bug_num || return "<missing bug number>";
- detaint_natural($bug_num) || return "<invalid bug number>";
+ if (! defined $bug_num || $bug_num eq "") {
+ return "<missing bug number>";
+ }
+ my $quote_bug_num = html_quote($bug_num);
+ detaint_natural($bug_num) || return "<invalid bug number: $quote_bug_num>";
# If we've run GetBugLink() for this bug number before, %::buglink
# will contain an anonymous array ref of relevent values, if not