Changeset 908107d for gutenbach


Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • gutenbach/debian/lib/sipbmp3-filter

    rde4ce86 r908107d  
    22# Play the data on STDIN as an audio file
    33#
    4 # $Id: sipbmp3-filter,v 1.24 2008-11-04 04:21:19 geofft Exp $
     4# $Id: sipbmp3-filter,v 1.25 2009-02-09 00:07:49 geofft Exp $
    55# $Source: /tmp/tmp.UFBNno9997/RCS/sipbmp3-filter,v $
    66#
     
    1717use Image::ExifTool qw(ImageInfo);
    1818use File::Spec::Functions;
     19use File::Temp qw{tempdir};
     20use File::Basename qw(basename);
    1921use LWP::UserAgent;
    2022use Data::Dumper;
     
    206208    }
    207209   
     210    my $tempdir = tempdir();
     211    my $newpath = $tempdir . '/' . basename($opts{'J'});
     212    symlink($filepath, $newpath);
    208213    if ($pid) { #parent
    209214        # Check if there were any errors
     
    220225       
    221226        close(ZEPHYR);
     227        unlink($newpath);
     228        rmdir($tempdir);
    222229    }
    223230  else { # child
     
    228235      open(STDIN, "/dev/null");
    229236      #print STDERR Dumper([qw|/usr/bin/mplayer -nolirc -ao alsa -quiet|, $filepath]);
    230       my @args = (qw|/usr/bin/mplayer -vo null -nolirc -ao alsa -cache 512 -really-quiet|, $filepath);
     237      my @args = (qw|/usr/bin/mplayer -vo null -nolirc -ao alsa -cache 512 -really-quiet|, $newpath);
    231238      #print STDERR "About to exec: ", Dumper([@args]);
    232239      exec(@args) ||
Note: See TracChangeset for help on using the changeset viewer.