mirrors/gstreamer
mirrors/gstreamer
1
1
Fork 0
mirror of https://gitlab.freedesktop.org/gstreamer/gstreamer.git synced 2024-11-28 04:31:06 +00:00
Code Issues 1 Projects Releases Wiki Activity

sigh, that was a silly bug

Browse source 
Original commit message from CVS:
sigh, that was a silly bug
This commit is contained in:
Thomas Vander Stichele 2002-11-03 13:43:01 +00:00
parent f4ac480d0b
commit c79698bcbf
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tools/gst-launch-ext
View file

@ -1,4 +1,5 @@
#!/usr/bin/perl -w #!/usr/bin/perl -w
use strict;
# launch a gst-launch pipeline for the supplied media file # launch a gst-launch pipeline for the supplied media file
# use the extension to determine the gst-launch pipeline # use the extension to determine the gst-launch pipeline
@ -15,7 +16,7 @@ sub extension
# .tar.gz extensions do we ? # .tar.gz extensions do we ?
if ($path =~ /\./) if ($path =~ /\./)
{ {
my $ext = $path; $ext = $path;
$ext =~ s/^.*\.//; $ext =~ s/^.*\.//;
} }
else { $ext = ""; } else { $ext = ""; }
@ -88,6 +89,7 @@ read_config ();
"ac3", "a52dec ! $cfg{AUDIOSINK}", "ac3", "a52dec ! $cfg{AUDIOSINK}",
"au", "auparse ! $cfg{AUDIOSINK}", "au", "auparse ! $cfg{AUDIOSINK}",
"avi", "avidemux video_%02d! { queue ! windec ! $cfg{VIDEOSINK} } avidemux0.audio_%02d! { queue ! mad ! $cfg{AUDIOSINK} }", "avi", "avidemux video_%02d! { queue ! windec ! $cfg{VIDEOSINK} } avidemux0.audio_%02d! { queue ! mad ! $cfg{AUDIOSINK} }",
"flac", "flacdec ! $cfg{AUDIOSINK}",
"fli", "flxdec ! colorspace ! $cfg{VIDEOSINK}", "fli", "flxdec ! colorspace ! $cfg{VIDEOSINK}",
"m1v", "mpegdemux video_%02d! { queue ! mpeg2dec ! $cfg{VIDEOSINK} }", "m1v", "mpegdemux video_%02d! { queue ! mpeg2dec ! $cfg{VIDEOSINK} }",
"m2v", "mpegdemux video_%02d! { queue ! mpeg2dec ! $cfg{VIDEOSINK} }", "m2v", "mpegdemux video_%02d! { queue ! mpeg2dec ! $cfg{VIDEOSINK} }",
@ -119,6 +121,10 @@ if ($#ARGV == -1) {
my $file; my $file;
while ($file = shift @ARGV) { while ($file = shift @ARGV) {
my $ext = extension ($file); my $ext = extension ($file);
if (!$ext) {
print "file $file doesn't have an extension !\n";
return -1;
}
if ($ext eq 'm3u') if ($ext eq 'm3u')
{ {
open (PLAYLIST, '<', $file); open (PLAYLIST, '<', $file);