root/trunk/plagger/lib/Plagger/Plugin/Notify/Audio/MSWin32.pm

Revision 1397 (checked in by miyagawa, 14 years ago)
  • Notify::Audio now just works. MacOSX portes wanted!
  • Added Notify::Audio::iTunesWin32
Line 
1 package Plagger::Plugin::Notify::Audio::MSWin32;
2 use strict;
3 use base qw( Plagger::Plugin::Notify::Audio);
4
5 use Win32::Sound;
6
7 sub play {
8     my($self, $filename) = @_;
9     $filename ||= "SystemExclamation";
10
11     Win32::Sound::Play($filename);
12 }
13
14 1;
Note: See TracBrowser for help on using the browser.