version 1.331.4.11, 2015/03/12 03:04:45
|
version 1.342, 2014/02/22 18:12:09
|
Line 193 sub handler {
|
Line 193 sub handler {
|
&Apache::lonnet::logthis('lonsearchcat:'. |
&Apache::lonnet::logthis('lonsearchcat:'. |
'Unable to recover data from '. |
'Unable to recover data from '. |
$persistent_db_file); |
$persistent_db_file); |
my $msg = |
my $msg = |
&mt('We were unable to retrieve data describing your search.'). |
&mt('We were unable to retrieve data describing your search.'). |
' '.&mt('This is a serious error and has been logged.'). |
' '.&mt('This is a serious error and has been logged.'). |
'<br />'. |
'<br />'. |
Line 432 sub hidden_field {
|
Line 432 sub hidden_field {
|
=pod |
=pod |
|
|
=over 4 |
=over 4 |
|
|
=item &print_basic_search_form() |
=item &print_basic_search_form() |
|
|
Prints the form for the basic search. Sorry the name is so cryptic. |
Prints the form for the basic search. Sorry the name is so cryptic. |
Line 3800 Cleans the global %groupsearch_db by rem
|
Line 3800 Cleans the global %groupsearch_db by rem
|
###################################################################### |
###################################################################### |
sub start_fresh_session { |
sub start_fresh_session { |
delete $groupsearch_db{'mode_catalog'}; |
delete $groupsearch_db{'mode_catalog'}; |
foreach (keys(%groupsearch_db)) { |
foreach (keys %groupsearch_db) { |
if ($_ =~ /^pre_/) { |
if ($_ =~ /^pre_/) { |
delete $groupsearch_db{$_}; |
delete $groupsearch_db{$_}; |
} |
} |