From 0649b8e7cc1a1db08e7934fa053d9cfb541b5a36 Mon Sep 17 00:00:00 2001 From: Chmouel Boudjnah Date: Tue, 28 Dec 1999 16:27:44 +0000 Subject: "Seethechangelog" --- sbin/chksession | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) (limited to 'sbin/chksession') diff --git a/sbin/chksession b/sbin/chksession index 7226a84..a735c0c 100644 --- a/sbin/chksession +++ b/sbin/chksession @@ -124,5 +124,13 @@ if ($xsession) { exit (0); } -print shift @lf, "\n" if $first; -if ($list) { my $p; for(@lf) { $p .= /$lf[-1]/ ? "$_ default failsafe" : "$_ " } print "$p\n"; } +@lf ? print shift @lf, "\n" : print "Default\n" + if $first; + +if ($list) { + if (@lf) { + my $p; for(@lf) { $p .= /$lf[-1]/ ? "$_ default failsafe" : "$_ " } print "$p\n"; + } else { + print "Default\n"; + } +} -- cgit v1.2.1