2 <& /elements/errorpage-popup.html, $error &>
4 <& /elements/header-popup.html, 'Saved search deleted' &>
5 <script type="text/javascript">
13 my $curuser = $FS::CurrentUser::CurrentUser;
15 my($query) = $cgi->keywords;
16 $query =~ /^(\d+)$/ || die "Illegal searchnum";
19 my $search = qsearchs('saved_search', {
20 'searchnum' => $searchnum,
21 'usernum' => $curuser->usernum,
23 my $error = $search->delete;