create $media_dir/s

diff --git a/bin/mplayer.pl b/bin/mplayer.pl
index 08ec71f..bf8997b 100755 (executable)
--- a/bin/mplayer.pl
+++ b/bin/mplayer.pl
@@ -197,7 +197,13 @@ sub html5tv {
                my $w = $prop->{width}  / $factor;
                my $h = $prop->{height} / $factor;
 
-               my $path = "$media_dir/s/$factor";
+               my $path = "$media_dir/s";
+               if ( ! -d $path ) {
+                       warn "create slides imaes in $path";
+                       mkdir $path;
+               }
+
+               $path .= '/' . $factor;
 
                if ( ! -d $path ) {
                        mkdir $path;