search —
Interchange 5.9.0:
Source: code/SystemTag/search.coretag
Lines: 11
# Copyright 2002-2009 Interchange Development Group and others # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. See the LICENSE file for details. UserTag search Order search UserTag search addAttr UserTag search Version $Revision: 1.5 $ UserTag search MapRoutine Vend::Page::do_search
Source: lib/Vend/Page.pm
Lines: 219
sub do_search { my($c) = @_; ::update_user(); # If search parameters not passed in via function, then safely pull them from # the CGI values. if (!is_hash($c)) { $c = find_search_params(\%CGI::values); _check_search_file($c); } if ($c->{mv_more_matches}) { $Vend::Session->{last_search} = "scan/MM=$c->{mv_more_matches}"; $c->{mv_more_matches} =~ m/([a-zA-Z0-9])+/; $c->{mv_cache_key} = $1; } else { create_last_search($c); } $c->{mv_cache_key} = generate_key($Vend::Session->{last_search}) unless defined $c->{mv_cache_key}; my $retval = perform_search($c); if (ref($retval)) { $::Instance->{SearchObject}{''} = $retval; $CGI::values{mv_nextpage} = $retval->{mv_search_page} || find_special_page('search') if ! $CGI::values{mv_nextpage}; } return 1; }