Ticket #7730: stream_raw.pl.diff

File stream_raw.pl.diff, 1.3 KB (added by barry253@…, 14 years ago)

modified stream_raw.pl to allow for Direct Download of multiple filetypes

  • .pl

    old new  
    33# MythWeb Streaming/Download module
    44#
    55# @url       $URL: http://svn.mythtv.org/svn/branches/release-0-22-fixes/mythplugins/mythweb/modules/stream/stream_raw.pl $
    6 # @date      $Date: 2009-03-25 17:31:03 +0000 (Wed, 25 Mar 2009) $
     6# @date      $Date: 2009-03-25 12:31:03 -0500 (Wed, 25 Mar 2009) $
    77# @version   $Revision: 20266 $
    88# @author    $Author: kormoc $
    99#
    … …  
    3434        $type   = 'video/nuppelvideo';
    3535        $suffix = '.nuv';
    3636    }
    37     elsif ($basename =~ /\.mkv$/) {
    38          $type   = 'video/x-matroska';
    39          $suffix = '.mkv';
    40      }
    41     elsif ($basename =~ /\.avi$/) {
    42          $type   = 'video/x-msvideo';
    43          $suffix = '.avi';
    44     elsif ($basename =~ /\.mov$/) {
    45          $type   = 'video/quicktime';
    46          $suffix = '.mov';
    47      }
    48     elsif ($basename =~ /\.mp4$/) {
    49          $type   = 'video/mp4';
    50          $suffix = '.mp4';
    51     elsif ($basename =~ /\.xvid$/) {
    52          $type   = 'video/mp4';
    53          $suffix = '.mp4';
    54     elsif ($basename =~ /\.ogv$/) {
    55          $type   = 'video/ogg';
    56          $suffix = '.ogv';
    5737    else {
    5838        print header(),
    5939              "Unknown video type requested:  $basename\n";