forked from germedeb/IconToaster
Improving the output.
This commit is contained in:
parent
61f93b9e25
commit
2751e2334d
11
functions.sh
11
functions.sh
@ -47,15 +47,24 @@ while (my $line = <$desktop_filehandle>) {
|
||||
close $desktop_filehandle;
|
||||
|
||||
open my $icon_filehandle, '<', $icon_search_file;
|
||||
say '
|
||||
Known Icons:
|
||||
-------------
|
||||
';
|
||||
while (my $line = <$icon_filehandle>) {
|
||||
chomp $line;
|
||||
say $line;
|
||||
$desktop_relation{$line} = 1;
|
||||
}
|
||||
close $icon_filehandle;
|
||||
|
||||
say '
|
||||
Missing icons:
|
||||
-------------
|
||||
';
|
||||
for my $key (keys %desktop_relation) {
|
||||
unless ($desktop_relation{$key}) {
|
||||
say qq($key is missing);
|
||||
say $key;
|
||||
}
|
||||
}
|
||||
EOF
|
||||
|
Loading…
Reference in New Issue
Block a user