From 731b154e46b7b22a835e482fdc0e34ae01a46eb6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sat, 13 Aug 2016 01:40:16 +0200 Subject: cleanup useless stuff after previous commit --- sbin/chksession | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) (limited to 'sbin') diff --git a/sbin/chksession b/sbin/chksession index d6ed385..8afb6f9 100644 --- a/sbin/chksession +++ b/sbin/chksession @@ -42,12 +42,7 @@ sub parse_file { # parse a session descriptor file local $_ = cat($fn); ($n = $1) =~ s| ||g if /^NAME=(.*)/m; $e = $1 if /^EXEC=(.*)/m; - my $dn = $1 if /^DESKTOPNAMES=(.*)/m; -# $d = $1 if /^DESC=(.*)/m; -# $i = $1 if /^ICON=(.*)/m; - $s = $1 while /SCRIPT:(.*?)$/gs; chomp $s; - if (-x $e) { $script{$n} = $s; $exe{$n} = $e; $desktopnames{$n} = $dn; push @lf, $n; ($order{$n}) = $fn =~ m/(^[0-9][0-9])/; } -# if (-x $e) { $script{$n} = $s; $exec{$n} = $e; $desc{$n} = $d; $icon{$n} = $i; push @lf, $n; } + if (-x $e) { push @lf, $n; ($order{$n}) = $fn =~ m/(^[0-9][0-9])/; } } usage(1) -- cgit v1.2.1