Changeset 908107d

Timestamp:

Feb 8, 2009, 7:07:49 PM (16 years ago)

Author:

geofft <geofft>

Branches:

master, debian, mac, no-cups, nodebathena, web

Children:

a041c73

Parents:

de4ce86

git-author:

geofft <geofft> (02/08/09 19:07:49)

git-committer:

geofft <geofft> (02/08/09 19:07:49)

Message:

Provide the right extension to mplayer 'cause it gets filetype detection wrong

File:

• gutenbach/debian/lib/sipbmp3-filter (modified) (5 diffs)

gutenbach/debian/lib/sipbmp3-filter

@@ -2 +2 @@
 # Play the data on STDIN as an audio file
 #
-# $Id: sipbmp3-filter,v 1.24 2008-11-04 04:21:19 geofft Exp $
+# $Id: sipbmp3-filter,v 1.25 2009-02-09 00:07:49 geofft Exp $
 # $Source: /tmp/tmp.UFBNno9997/RCS/sipbmp3-filter,v $
 #
@@ -17 +17 @@
 use Image::ExifTool qw(ImageInfo);
 use File::Spec::Functions;
+use File::Temp qw{tempdir};
+use File::Basename qw(basename);
 use LWP::UserAgent;
 use Data::Dumper;
@@ -206 +208 @@
     }
     
+    my $tempdir = tempdir();
+    my $newpath = $tempdir . '/' . basename($opts{'J'});
+    symlink($filepath, $newpath);
     if ($pid) { #parent
         # Check if there were any errors
@@ -220 +225 @@
         
         close(ZEPHYR);
+        unlink($newpath);
+        rmdir($tempdir);
     }
   else { # child
@@ -228 +235 @@
       open(STDIN, "/dev/null");
       #print STDERR Dumper([qw|/usr/bin/mplayer -nolirc -ao alsa -quiet|, $filepath]);
-      my @args = (qw|/usr/bin/mplayer -vo null -nolirc -ao alsa -cache 512 -really-quiet|, $filepath);
+      my @args = (qw|/usr/bin/mplayer -vo null -nolirc -ao alsa -cache 512 -really-quiet|, $newpath);
       #print STDERR "About to exec: ", Dumper([@args]);
       exec(@args) ||