Skip to content

Commit

Permalink
further log improvements
Browse files Browse the repository at this point in the history
  • Loading branch information
lstein committed Aug 30, 2012
1 parent e4336f8 commit 46ebf70
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions bin/gbrowse_clean.pl
Expand Up @@ -54,7 +54,7 @@


my $remember_settings_time = $globals->remember_settings_time; my $remember_settings_time = $globals->remember_settings_time;


logit("Expiring sessions older than $remember_settings_time..."); logit("Expiring sessions older than $remember_settings_time...\n");
my $dsn = $globals->code_setting(general=>'session driver'); my $dsn = $globals->code_setting(general=>'session driver');
my %dsn = shellwords($globals->code_setting(general=>'session args')); my %dsn = shellwords($globals->code_setting(general=>'session args'));
my $rst = $globals->time2sec($remember_settings_time); my $rst = $globals->time2sec($remember_settings_time);
Expand Down Expand Up @@ -117,9 +117,9 @@




# Traverse desired filesystems # Traverse desired filesystems
logit("Deleting cache files and directories...\n"); logit("Deleting cache files and directories older than ".$globals->cache_time." (see GBrowse.conf \"expire cache\" option...\n");
File::Find::finddepth( {wanted=>$wanted}, $tmpdir); File::Find::finddepth( {wanted=>$wanted}, $tmpdir);
logit("Deleting unused user uploads older than $uploads_secs seconds (see \"expire uploads\" option in GBrowse.conf)...\n"); logit("Deleting unaccessed user uploads older than ".$globals->upload_time." (see GBrowse.conf \"expire uploads\" option)...\n");
File::Find::finddepth( {wanted=>$wanted}, $user_dir); File::Find::finddepth( {wanted=>$wanted}, $user_dir);
logit("Deleted $directories directories and $files files.\n"); logit("Deleted $directories directories and $files files.\n");
if ($uploads_db) { if ($uploads_db) {
Expand Down

0 comments on commit 46ebf70

Please sign in to comment.