version 1.331.4.10, 2014/02/23 22:16:20
|
version 1.331.4.11, 2015/03/12 03:04:45
|
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{$_}; |
} |
} |