#------------------------------------------------------------------------# Compiled template generated by the Template Toolkit version 2.20#------------------------------------------------------------------------Template::Document->new({    METADATA => {        'modtime' => '1162686430',        'name' => 'global/select-menu.html.tmpl',    },    BLOCK => sub {        my $context = shift || die "template sub called without context\n";        my $stash   = $context->stash;        my $output  = '';        my $_tt_error;                eval { BLOCK: {    $output .=  "\n";    $output .=  "\n\n";    $output .=  "\n \n";    #line 44 "template\en\default\global\select-menu.html.tmpl"        # CAPTURE    $stash->set('options_type', do {        my $output = '';    #line 44 "template\en\default\global\select-menu.html.tmpl"    $output .=  $stash->get('options');        $output;    });        $output .=  "\n\n<select name=\"";    #line 46 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get('name');                &$_tt_filter($output);    };        $output .=  "\" ";    #line 47 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get('onchange')) {    $output .=  "onchange=\"";    #line 47 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get('onchange');                &$_tt_filter($output);    };        $output .=  "\"";    }        #line 48 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get('multiple')) {    $output .=  " multiple ";    }        #line 49 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get('size')) {    $output .=  " size=\"";    #line 49 "template\en\default\global\select-menu.html.tmpl"    $output .=  $stash->get('size');    $output .=  "\" ";    }        $output .=  ">";    #line 64 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get(['options_type', 0, 'search', [ 'ARRAY' ]])) {    #line 56 "template\en\default\global\select-menu.html.tmpl"        # FOREACH     do {        my ($_tt_value, $_tt_error, $_tt_oldloop);        my $_tt_list = $stash->get('options');                unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {            $_tt_list = Template::Config->iterator($_tt_list)                || die $Template::Config::ERROR, "\n";         }            ($_tt_value, $_tt_error) = $_tt_list->get_first();        eval { $_tt_oldloop = $stash->get('loop') };        $stash->set('loop', $_tt_list);        eval {    LOOP:   while (! $_tt_error) {                $stash->{'value'} = $_tt_value;    $output .=  "\n      <option value=\"";    #line 52 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get('value');                &$_tt_filter($output);    };        $output .=  "\"";    #line 53 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get('value') eq $stash->get('default')) {    $output .=  ' selected';    }        $output .=  ">";    #line 54 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get('value');                &$_tt_filter($output);    };        $output .=  "\n      </option>";;                ($_tt_value, $_tt_error) = $_tt_list->get_next();            }        };        $stash->set('loop', $_tt_oldloop);        die $@ if $@;        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;        die $_tt_error if $_tt_error;    };        }    elsif ($stash->get(['options_type', 0, 'search', [ 'HASH' ]])) {    #line 63 "template\en\default\global\select-menu.html.tmpl"        # FOREACH     do {        my ($_tt_value, $_tt_error, $_tt_oldloop);        my $_tt_list = $stash->get('options');                unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {            $_tt_list = Template::Config->iterator($_tt_list)                || die $Template::Config::ERROR, "\n";         }            ($_tt_value, $_tt_error) = $_tt_list->get_first();        eval { $_tt_oldloop = $stash->get('loop') };        $stash->set('loop', $_tt_list);        eval {    LOOP:   while (! $_tt_error) {                $stash->{'option'} = $_tt_value;    $output .=  "\n      <option value=\"";    #line 59 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get(['option', 0, 'value', 0]);                &$_tt_filter($output);    };        $output .=  "\" ";    #line 60 "template\en\default\global\select-menu.html.tmpl"    if ($stash->get(['option', 0, 'value', 0]) eq $stash->get('default')) {    $output .=  ' selected';    }        $output .=  ">";    #line 61 "template\en\default\global\select-menu.html.tmpl"        # FILTER    $output .=  do {        my $output = '';        my $_tt_filter = $context->filter('html')                  || $context->throw($context->error);        $output .=  $stash->get(['option', 0, 'key', 0]);                &$_tt_filter($output);    };        $output .=  "\n      </option>";;                ($_tt_value, $_tt_error) = $_tt_list->get_next();            }        };        $stash->set('loop', $_tt_oldloop);        die $@ if $@;        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;        die $_tt_error if $_tt_error;    };        }        $output .=  "\n</select>\n";        } };        if ($@) {            $_tt_error = $context->catch($@, \$output);            die $_tt_error unless $_tt_error->type eq 'return';        }            return $output;    },    DEFBLOCKS => {    },});