be silent unless told otherwise
This commit is contained in:
parent
8d8a223612
commit
98fca3e86b
|
@ -6,6 +6,7 @@ use File::Slurp;
|
||||||
use Data::Dumper;
|
use Data::Dumper;
|
||||||
|
|
||||||
my $launcher = $ARGV[0];
|
my $launcher = $ARGV[0];
|
||||||
|
my $verbose = 0;
|
||||||
|
|
||||||
my $launcher_dir = "$ENV{HOME}/.config/xfce4/panel/launcher-$launcher";
|
my $launcher_dir = "$ENV{HOME}/.config/xfce4/panel/launcher-$launcher";
|
||||||
|
|
||||||
|
@ -30,7 +31,7 @@ for my $xterm_script (@xterm_scripts) {
|
||||||
if ($desktop_files{$name}{content_fields}{Icon} ne $icon_file) {
|
if ($desktop_files{$name}{content_fields}{Icon} ne $icon_file) {
|
||||||
$desktop_files{$name}{content_fields}{Icon} = $icon_file;
|
$desktop_files{$name}{content_fields}{Icon} = $icon_file;
|
||||||
replace($desktop_files{$name});
|
replace($desktop_files{$name});
|
||||||
say STDERR "replaced desktop entry $desktop_files{$name}{filename} for $name";
|
say STDERR "replaced desktop entry $desktop_files{$name}{filename} for $name" if $verbose;
|
||||||
}
|
}
|
||||||
} else {
|
} else {
|
||||||
|
|
||||||
|
@ -47,7 +48,7 @@ for my $xterm_script (@xterm_scripts) {
|
||||||
current => 1
|
current => 1
|
||||||
};
|
};
|
||||||
replace($desktop_files{$name});
|
replace($desktop_files{$name});
|
||||||
say STDERR "created new desktop entry $desktop_files{$name}{filename} for $name";
|
say STDERR "created new desktop entry $desktop_files{$name}{filename} for $name" if $verbose;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -55,7 +56,7 @@ $desktop_files{XTerm}{current} = 1; # we always want that
|
||||||
|
|
||||||
for my $name (sort keys %desktop_files) {
|
for my $name (sort keys %desktop_files) {
|
||||||
unless ($desktop_files{$name}{current}) {
|
unless ($desktop_files{$name}{current}) {
|
||||||
say STDERR "deleting obsolete desktop entry $desktop_files{$name}{filename} for $name";
|
say STDERR "deleting obsolete desktop entry $desktop_files{$name}{filename} for $name" if $verbose;
|
||||||
unlink($desktop_files{$name}{filename});
|
unlink($desktop_files{$name}{filename});
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue