my $qname = SqlQuote($name);
SendSQL("SELECT query FROM namedqueries WHERE userid = $userid AND name = $qname");
my $result = FetchOneColumn();
- $result || ThrowUserError("missing_query", {'queryname' => $name});
+
+ defined($result) || ThrowUserError("missing_query", {'queryname' => $name});
+ $result
+ || ThrowUserError("buglist_parameters_required", {'queryname' => $name});
+
return $result;
}
$name !~ /[<>&]/ || ThrowUserError("illegal_query_name");
my $qname = SqlQuote($name);
+ $::FORM{'newquery'} || ThrowUserError("buglist_parameters_required",
+ {'queryname' => $name});
my $qbuffer = SqlQuote($::FORM{'newquery'});
-
+
my $tofooter = 1;
$vars->{'message'} = "buglist_new_named_query";
[% ELSIF error == "buglist_parameters_required" %]
[% title = "Parameters Required" %]
- [% url = "query.cgi" %]
- [% link = "Please use the search form to specify some search criteria." %]
- This script is not meant to be invoked without any search terms.
+ You may not search, or create saved searches, without any search terms.
[% ELSIF error == "bugs_not_changed" %]
[% title = BLOCK %][% terms.Bugs %] Not Changed[% END %]