Changeset 20182 for extensions

Timestamp:

2009-08-07T11:15:31+12:00 (15 years ago)

Author:

davidb

Message:

Shifting to using concatenated VOB files

File:

• extensions/gsdl-video/trunk/perllib/plugins/TimedHTMLPlugin.pm (modified) (2 diffs)

extensions/gsdl-video/trunk/perllib/plugins/TimedHTMLPlugin.pm

@@ -553 +553 @@
 
     if ($media_type eq "video") {
-    $src_file = "$media_root\_01_$tape_num.VOB";
+    # $src_file = "$media_root\_01_$tape_num.VOB";
+    $src_file = "$media_root\_01.VOB";
     $src_filename 
         = &util::filename_cat($media_base_dir, $src_file);
     }
     elsif ($media_type =~ m/^audio$/) {
-    $src_file = "$media_root\_Tape$tape_num.mp3";
+    # $src_file = "$media_root\_Tape$tape_num.mp3";
+    $src_file = "$media_root.mp3";
     $src_filename 
         = &util::filename_cat($media_base_dir, $src_file);
@@ -569 +571 @@
     $self->{'file_blocks'}->{$src_filename} = 1;
 
-    my $re_file_block = $src_filename;
-    $re_file_block =~ s/_01_$tape_num.VOB$/_\\d+_\\d+.VOB\$/;
-    
-    
-    push(@{$self->{'re_file_block'}},$re_file_block);
+#   my $re_file_block = $src_filename;
+#   $re_file_block =~ s/_01_$tape_num.VOB$/_\\d+_\\d+.VOB\$/;
+        
+#   push(@{$self->{'re_file_block'}},$re_file_block);
     }