#------------------------------------------------------------------------ # Compiled template generated by the Template Toolkit version 2.09 #------------------------------------------------------------------------ Template::Document->new({ METADATA => { 'modtime' => '1026415685', 'name' => 'search/form.html.tmpl', }, BLOCK => sub { my $context = shift || die "template sub called without context\n"; my $stash = $context->stash; my $output = ''; my $error; eval { BLOCK: { $output .= "\n"; $output .= "\n \n "; $output .= "\n\n\n"; $stash->set('query_variants', [ { 'value' => 'allwordssubstr', 'description' => 'contains all of the words/strings' }, { 'value' => 'anywordssubstr', 'description' => 'contains any of the words/strings' }, { 'value' => 'substring', 'description' => 'contains the string' }, { 'value' => 'casesubstring', 'description' => 'contains the string (exact case)' }, { 'value' => 'allwords', 'description' => 'contains all of the words' }, { 'value' => 'anywords', 'description' => 'contains any of the words' }, { 'value' => 'regexp', 'description' => 'matches the regexp' }, { 'value' => 'notregexp', 'description' => 'doesn\'t match the regexp' } ]); $output .= "\n \n"; $output .= "\n\n\n \n \n \n \n \n \n\n"; $output .= "\n\n \n \n \n \n"; $output .= "\n"; # FOREACH do { my ($value, $error, $oldloop); my $list = [ { 'name' => 'long_desc', 'description' => 'A comment' }, { 'name' => 'bug_file_loc', 'description' => 'The URL' }, { 'name' => 'status_whiteboard', 'description' => 'Whiteboard' } ]; unless (UNIVERSAL::isa($list, 'Template::Iterator')) { $list = Template::Config->iterator($list) || die $Template::Config::ERROR, "\n"; } ($value, $error) = $list->get_first(); eval { $oldloop = $stash->get('loop') }; $stash->set('loop', $list); eval { LOOP: while (! $error) { $stash->{'field'} = $value; $output .= "\n"; if (!($stash->get(['field', 0, 'name', 0]) eq 'status_whiteboard' && ! $stash->get(['Param', [ 'usestatuswhiteboard' ]]))) { $output .= "\n \n \n \n \n \n "; } ; ($value, $error) = $list->get_next(); } }; $stash->set('loop', $oldloop); die $@ if $@; $error = 0 if $error && $error eq Template::Constants::STATUS_DONE; die $error if $error; }; $output .= "\n"; if ($stash->get('have_keywords')) { $output .= "\n \n \n \n \n "; } $output .= "\n
Summary:\n \n \n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'short_desc', 0, 0, 0]); &$filter($output); }; $output .= "\">\n \n get('button_name'); $output .= "\">\n
\n \n \n \n \n \n"; if (($stash->get(['Param', [ 'usetargetmilestone' ]]))) { $output .= "\n "; } $output .= "\n \n\n \n\n "; $output .= "\n \n\n \n"; $output .= $context->process('select', { 'sel' => { 'name' => 'version', 'size' => 5 } }); $output .= "\n"; if ($stash->get(['Param', [ 'usetargetmilestone' ]]) && $stash->get(['target_milestone', 0, 'size', 0]) > 0) { $output .= $context->process('select', { 'sel' => { 'name' => 'target_milestone', 'size' => 5 } }); } $output .= "\n \n
Product:Component:Version:Target:
\n \n \n \n
\n
"; $output .= $stash->get(['field', 0, 'description', 0]); $output .= ":\n \n get(['field', 0, 'name', 0]); $output .= "\" size=\"40\" value=\""; # FILTER $output .= do { my $output = ''; my $filter = $context->filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, $stash->get(['field', 0, 'name', 0]), 0, 0, 0]); &$filter($output); }; $output .= "\">\n
Keywords:\n \n \n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'keywords', 0, 0, 0]); &$filter($output); }; $output .= "\">\n
\n\n
\n\n"; $output .= "\n\n\n \n \n \n \n \n \n \n \n\n "; $output .= $context->process('select', { 'sel' => { 'name' => 'bug_status', 'size' => 7 } }); $output .= $context->process('select', { 'sel' => { 'name' => 'resolution', 'size' => 7 } }); $output .= $context->process('select', { 'sel' => { 'name' => 'bug_severity', 'size' => 7 } }); $output .= " "; $output .= $context->process('select', { 'sel' => { 'name' => 'priority', 'size' => 7 } }); $output .= " "; $output .= $context->process('select', { 'sel' => { 'name' => 'rep_platform', 'size' => 7 } }); $output .= $context->process('select', { 'sel' => { 'name' => 'op_sys', 'size' => 7 } }); $output .= "\n \n
Status:Resolution:Severity:Priority:Hardware:OS:
\n\n

\n\n"; $output .= "\n\n\n \n \n \n"; $output .= "\n\n \n \n
\n
\n \n \n Email and Numbering\n \n \n\n\n\n "; # FOREACH do { my ($value, $error, $oldloop); my $list = [ 1, 2 ]; unless (UNIVERSAL::isa($list, 'Template::Iterator')) { $list = Template::Config->iterator($list) || die $Template::Config::ERROR, "\n"; } ($value, $error) = $list->get_first(); eval { $oldloop = $stash->get('loop') }; $stash->set('loop', $list); eval { LOOP: while (! $error) { $stash->{'n'} = $value; $output .= "\n ";; ($value, $error) = $list->get_next(); } }; $stash->set('loop', $oldloop); die $@ if $@; $error = 0 if $error && $error eq Template::Constants::STATUS_DONE; die $error if $error; }; $output .= "\n \n
\n\n\n\n \n \n \n \n \n \n \n \n "; if ($stash->get(['Param', [ 'useqacontact' ]])) { $output .= "\n \n \n "; } $output .= "\n \n \n \n \n \n \n \n \n \n \n \n \n
\n Any of:\n
\n get('n'); $output .= "\" \n id=\"emailassigned_to"; $output .= $stash->get('n'); $output .= "\" value=\"1\""; if ($stash->get(['default', 0, 'emailassigned_to', 0, $stash->get('n'), 0])) { $output .= ' checked'; } $output .= ">\n \n
\n get('n'); $output .= "\" \n id=\"emailreporter"; $output .= $stash->get('n'); $output .= "\" value=\"1\""; if ($stash->get(['default', 0, 'emailreporter', 0, $stash->get('n'), 0])) { $output .= ' checked'; } $output .= ">\n \n
\n get('n'); $output .= "\" \n id=\"emailqa_contact"; $output .= $stash->get('n'); $output .= "\" value=\"1\""; if ($stash->get(['default', 0, 'emailqa_contact', 0, $stash->get('n'), 0])) { $output .= ' checked'; } $output .= ">\n \n
\n get('n'); $output .= "\" \n id=\"emailcc"; $output .= $stash->get('n'); $output .= "\" value=\"1\""; if ($stash->get(['default', 0, 'emailcc', 0, $stash->get('n'), 0])) { $output .= ' checked'; } $output .= ">\n \n
\n get('n'); $output .= "\" \n id=\"emaillongdesc"; $output .= $stash->get('n'); $output .= "\" value=\"1\""; if ($stash->get(['default', 0, 'emaillongdesc', 0, $stash->get('n'), 0])) { $output .= ' checked'; } $output .= ">\n \n
\n \n
\n get('n'); $output .= "\" size=\"25\" value=\""; # FILTER $output .= do { my $output = ''; my $filter = $context->filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'email', 0, $stash->get('n'), 0]); &$filter($output); }; $output .= "\">\n
\n\n \n
\n
\n \n \n \n \n \n \n \n \n "; if ($stash->get(['Param', [ 'usevotes' ]])) { $output .= "\n \n \n \n "; } $output .= "\n
\n \n bugs numbered: \n \n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'bug_id', 0, 0, 0]); &$filter($output); }; $output .= "\" size=\"20\">\n
(comma-separated list)
\n Only bugs with at least:\n \n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'votes', 0, 0, 0]); &$filter($output); }; $output .= "\"> votes\n
\n\n\n
\n
\n
\n Bug Changes\n\n\n
\n
Only bugs changed in the last
\n
filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'changedin', 0, 0, 0]); &$filter($output); }; $output .= "\"> days
\n
\n\n
\n
Only bugs where any of the fields
\n
\n \n
\n\n
were changed between
\n
\n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'chfieldfrom', 0, 0, 0]); &$filter($output); }; $output .= "\">\n and filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'chfieldto', 0, 0, 0]); &$filter($output); }; $output .= "\">\n
(YYYY-MM-DD)\n
\n
to this value: (optional)
\n
\n filter('html') || $context->throw($context->error); $output .= $stash->get(['default', 0, 'chfieldvalue', 0, 0, 0]); &$filter($output); }; $output .= "\">\n
\n
\n\n\n
\n
\n\n"; $output .= "\n\n"; $output .= "\n"; $output .= "\n"; $output .= "\n"; $output .= "\n"; } }; if ($@) { $error = $context->catch($@, \$output); die $error unless $error->type eq 'return'; } return $output; }, DEFBLOCKS => { 'select' => sub { my $context = shift || die "template sub called without context\n"; my $stash = $context->stash; my $output = ''; my $error; eval { BLOCK: { $output .= "\n \n \n "; } }; if ($@) { $error = $context->catch($@, \$output); die $error unless $error->type eq 'return'; } return $output; }, }, });