always produce jpeg

diff --git a/bin/mplayer.pl b/bin/mplayer.pl
index 1ad67ec..08ec71f 100755 (executable)
--- a/bin/mplayer.pl
+++ b/bin/mplayer.pl
@@ -205,13 +205,11 @@ sub html5tv {
 
                }
 
-               my $path = "$media_dir/s/$factor";
-
                foreach my $hires ( @slides_hires ) {
 
                        my $file = $hires;
-                       $file =~ s{(\d+\.\w)$}{$path/$1} || warn "can't rewrite $file";
-                       warn "slide $hires $file\n";
+                       $file =~ s{(\d+)\.\w+$}{$path/$1.jpg} || warn "can't rewrite $file";
+                       warn "slide $hires -> $file\n";
                        next if -e $file;
 
                        my $im = Imager->new( file => $hires );