summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJarle Bjørgeengen <jarle@bjorgeengen.net>2010-10-15 15:18:51 +0000
committerJarle Bjørgeengen <jarle@bjorgeengen.net>2010-10-15 15:18:51 +0000
commit00b8cc34ea3016393e9ac92ae829c0a364c19088 (patch)
tree6050f0ad7269071a220c9293cef7571cb96fff66
parentb55de8df3ad6ed742e5a44de80ad12cc82736056 (diff)
bugfix
-rwxr-xr-xtools/gen_frikanalen_video.pl7
1 files changed, 3 insertions, 4 deletions
diff --git a/tools/gen_frikanalen_video.pl b/tools/gen_frikanalen_video.pl
index 9b08431..f6558ea 100755
--- a/tools/gen_frikanalen_video.pl
+++ b/tools/gen_frikanalen_video.pl
@@ -33,7 +33,7 @@ my %opts;
my $intro_length = 10;
my $pid = $$;
-getopts('di:m:o:b:s', \%opts);
+getopts('di:m:o:b:s:', \%opts);
my $debug = $opts{d} || 0;
my $workdir = "./fk-temp-$pid";
#my $startposter = "$workdir/startposter.png";
@@ -302,9 +302,8 @@ sub savetemp {
}
sub getsrtfile {
- my $base = $opts{'i'};
- $base =~ s/\..+$//; # Could be .dv or .avi or whatnot. This strips it off anyway.
- return "$opts{'s'}/$base.srt";
+ $opts{'i'} =~ /.+\/(.+)\..+$/; # Could be .dv or .avi or whatnot. This strips it off anyway.
+ return "$opts{'s'}/$1.srt";
}
sub runcmd {