aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--sbin/chksession6
1 files changed, 1 insertions, 5 deletions
diff --git a/sbin/chksession b/sbin/chksession
index 2afe61c..72208a8 100644
--- a/sbin/chksession
+++ b/sbin/chksession
@@ -68,11 +68,7 @@ while ($ARGV[0] =~ /^--/ || $ARGV[0] =~ /^-/) {
}
$dir = $test ? './wmsession.d/' : '/etc/X11/wmsession.d/' unless $dir;
-opendir D, $dir or die "Can't open $dir\n";
-for (readdir(D)) {
- my $file = $_;
- parse_file ("$dir/$file");
-}
+chdir $dir; parse_file ("$dir/$_") for <*>;
sub cat { my ($f) = @_; local *F; open F, $f; join '', <F> }
my ($e) = cat("/etc/sysconfig/desktop") =~ /(\S+)/;