Ticket #7730: stream_raw.pl.2.diff
File stream_raw.pl.2.diff, 1.3 KB (added by , 16 years ago) |
---|
-
.pl
old new 3 3 # MythWeb Streaming/Download module 4 4 # 5 5 # @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 1 2:31:03 -0500 (Wed, 25 Mar 2009) $6 # @date $Date: 2009-03-25 17:31:03 +0000 (Wed, 25 Mar 2009) $ 7 7 # @version $Revision: 20266 $ 8 8 # @author $Author: kormoc $ 9 9 # … … 34 34 $type = 'video/nuppelvideo'; 35 35 $suffix = '.nuv'; 36 36 } 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'; 37 57 else { 38 58 print header(), 39 59 "Unknown video type requested: $basename\n";