version 1.343, 2014/02/23 22:15:27
|
version 1.344, 2014/12/14 22:11:03
|
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{$_}; |
} |
} |