version 1.341, 2014/01/14 18:54:56
|
version 1.344, 2014/12/14 22:11:03
|
Line 170 sub handler {
|
Line 170 sub handler {
|
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
|
|
my @allowed_searches = ('portfolio'); |
my @allowed_searches = ('portfolio'); |
if (&Apache::lonnet::allowed('bre',$env{'request.role.domain'})) { |
if (&Apache::lonnet::allowed('bre',$env{'request.role.domain'}) eq 'F') { |
push(@allowed_searches,'res'); |
push(@allowed_searches,'res'); |
} |
} |
my $crumb_text = 'Portfolio Search'; |
my $crumb_text = 'Portfolio Search'; |
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 449 sub print_basic_search_form {
|
Line 449 sub print_basic_search_form {
|
$env{'form.catalogmode'} ne 'import'); |
$env{'form.catalogmode'} ne 'import'); |
my $scrout = &Apache::loncommon::start_page('Content Library').$bread_crumb; |
my $scrout = &Apache::loncommon::start_page('Content Library').$bread_crumb; |
# Search form for resource space |
# Search form for resource space |
if (&Apache::lonnet::allowed('bre',$env{'request.role.domain'})) { |
if (&Apache::lonnet::allowed('bre',$env{'request.role.domain'}) eq 'F') { |
$scrout .= &setup_basic_search($r,'res',$hidden_fields,$closebutton); |
$scrout .= &setup_basic_search($r,'res',$hidden_fields,$closebutton); |
$scrout .= '<hr /><br />'; |
$scrout .= '<hr /><br />'; |
} |
} |
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{$_}; |
} |
} |