reduce it

[nethome.git] / bin / idle

diff --git a/bin/idle b/bin/idle
index 97863e4..38a76c7 100755 (executable)
--- a/bin/idle
+++ b/bin/idle
@@ -22,6 +22,7 @@ sub useridle()
                local $_;
                next if defined($_=$utmp->{"ut_type"}) && $_!=&User::Utmp::USER_PROCESS();
                next if defined($_=$utmp->{"ut_user"}) && !$valid_users{$_};
+               next if $utmp->{"ut_line"}=~m{^:\d+};   # X login
                my $line="/dev/".$utmp->{"ut_line"};
                my $atime=(stat $line)[8];
                my $what="user \"".($utmp->{"ut_user"} || "<local>")."\", line \"$line\"";