my $key = $_;
my $a_album = sanitise($key);
- open THUMB, "-|", "$FVWM/thumbnail.sh",
+ open THUMB, "-|", "$FVWM/scripts/thumbnail.sh",
"--small", "--music", $albums{$key};
my $thumb = <THUMB>;
close THUMB;
$t_artist = sanitise($t_artist);
$t_title = sanitise($t_title);
- open THUMB, "-|", "$FVWM/thumbnail.sh",
+ open THUMB, "-|", "$FVWM/scripts/thumbnail.sh",
"--small", "--music", $t_file;
my $thumb = <THUMB>;
close(THUMB);
}
die("Failed data query\n") unless (keys(%entry) > 0);
- open THUMB, "-|", "$FVWM/thumbnail.sh",
+ open THUMB, "-|", "$FVWM/scripts/thumbnail.sh",
"--image", "--music", $entry{file};
my $thumb = <THUMB>;
my $scan = <THUMB>;