don't include empty password in words links

[ott/bsta] / oldlogs.1.pl

diff --git a/oldlogs.1.pl b/oldlogs.1.pl
index 0563fd2526b1749e1ae294eb737ca1c736fe3566..dbb44211990620cd92b3dbcef1448169997acd76 100644 (file)
--- a/oldlogs.1.pl
+++ b/oldlogs.1.pl
@@ -55,8 +55,8 @@ my $logs_total        = ($ARGV[2] =~ /^[0-9]+$/) ? int($&) : LOGS_TOTAL();
 my $logs_uncompressed = ($ARGV[3] =~ /^[0-9]+$/) ? int($&) : LOGS_UNCOMPRESSED();
 
 if (opendir_encoded(my $dir, $log_path)) {
-       while (my $file_name = readdir_decoded($dir)) {
-               if ($file_name !~ /\.logo$/) {
+       while (defined (my $file_name = readdir_decoded($dir))) {
+               if ($file_name !~ /\.log$/) {
                        next;
                }
                my $full_path = join_path(PATH_SEPARATOR(), $log_path, $file_name);