# currently we spit HTML which is HTML 4.1 complient, so XHTML is no-no. # tell that to CGI.pm, but while we don't use it here, we load it here # for swish.cgi to use, so we don't pollute the standard swish.cgi # from the distro use CGI '-no-xhtml'; use Storable; my $CHECKBOX_DATA = 'checkboxes.storable'; # Display swish times in GMT $ENV{TZ} = 'UTC'; return { title => 'Search mod_perl Site', prepend_path => '../', # search results are shown one level down display_props => [qw/swishlastmodified swishdocsize swishdocpath pagelen/], page_size => 10, template => { package => 'TemplateToolkit', file => 'search.tt', options => { INCLUDE_PATH => '.', }, }, select_by_meta => { #method => 'radio_group', # pick: radio_group, popup_menu, or checkbox_group method => 'checkbox_group', #method => 'popup_menu', columns => 6, metaname => 'section', # Can't be a metaname used elsewhere! description => 'Limit search to these areas: ', # This is the tree structure of selects, saved with Storable items => retrieve( $CHECKBOX_DATA ), }, };