r22572 - in /trunk/libaudio-mpd-perl: Changes META.yml bin/mpd-dynamic debian/changelog lib/Audio/MPD.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Tue Jul  1 07:10:17 2008
New Revision: 22572

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22572
Log:
New upstream release

Modified:
    trunk/libaudio-mpd-perl/Changes
    trunk/libaudio-mpd-perl/META.yml
    trunk/libaudio-mpd-perl/bin/mpd-dynamic
    trunk/libaudio-mpd-perl/debian/changelog
    trunk/libaudio-mpd-perl/lib/Audio/MPD.pm

Modified: trunk/libaudio-mpd-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/Changes?rev=22572&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/Changes (original)
+++ trunk/libaudio-mpd-perl/Changes Tue Jul  1 07:10:17 2008
@@ -18,6 +18,14 @@
 
 Low-level changelog
 ===================
+
+0.19.2 Tue Jun 17 19:24:16 CEST 2008
+ - mpd-dynamic should lookup ratings with utf8 encoded pathes
+
+0.19.1 Mon Dec  3 18:23:58 CET 2007
+ - new method all_playlists() (courtesy of Joey Hess)
+ - fix for filenames / playlists beginning with a space (courtesy of
+   Joey Hess)
 
 0.19.0 Thu Nov 29 20:10:18 CET 2007
  - changed constructor api: using a hash for options instead of

Modified: trunk/libaudio-mpd-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/META.yml?rev=22572&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/META.yml (original)
+++ trunk/libaudio-mpd-perl/META.yml Tue Jul  1 07:10:17 2008
@@ -1,6 +1,6 @@
 ---
 name: Audio-MPD
-version: 0.19.1
+version: 0.19.2
 author: []
 abstract: class to talk to MPD (Music Player Daemon) servers
 license: perl
@@ -29,7 +29,7 @@
 provides:
   Audio::MPD:
     file: lib/Audio/MPD.pm
-    version: 0.19.1
+    version: 0.19.2
   Audio::MPD::Collection:
     file: lib/Audio/MPD/Collection.pm
   Audio::MPD::Playlist:

Modified: trunk/libaudio-mpd-perl/bin/mpd-dynamic
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/bin/mpd-dynamic?rev=22572&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/bin/mpd-dynamic (original)
+++ trunk/libaudio-mpd-perl/bin/mpd-dynamic Tue Jul  1 07:10:17 2008
@@ -64,7 +64,7 @@
 
         PICK_ONE:
         for (1..$new) {
-            my $random = $files[ rand @files ];
+            my $random = encode('utf-8', $files[ rand @files ]);
             if ( $istied && exists $ratings{$random}
                  && $ratings{$random} != 0
                  && $ratings{$random} < $ARGV{min} ) {
@@ -72,7 +72,7 @@
                 redo PICK_ONE;
             }
             debug("adding [$random]\n");
-            eval { $mpd->playlist->add( $random ) };
+            eval { $mpd->playlist->add( decode('utf-8', $random) ) };
             debug("error: $@\n") if $@;
         }
         untie %ratings if $istied;
@@ -89,7 +89,7 @@
     my ($msg) = @_;
     my ($s,$m,$h) = ( localtime(time) )[0,1,2,3,6];
     my $date = sprintf "%02d:%02d:%02d", $h, $m, $s;
-    warn "$date " . encode($ARGV{encoding}, $msg);
+    warn "$date $msg";
 }
 
 __END__

Modified: trunk/libaudio-mpd-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/debian/changelog?rev=22572&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/debian/changelog (original)
+++ trunk/libaudio-mpd-perl/debian/changelog Tue Jul  1 07:10:17 2008
@@ -1,9 +1,13 @@
-libaudio-mpd-perl (0.19.1-3) UNRELEASED; urgency=low
+libaudio-mpd-perl (0.19.2-1) UNRELEASED; urgency=low
 
+  [ Joey Hess ]
   * Some more rules file minimisation.
   * Include examples/* and AUTHORS.
 
- -- Joey Hess <joeyh at debian.org>  Thu, 24 Apr 2008 00:07:05 -0400
+  [ Damyan Ivanov ]
+  * New upstream release
+
+ -- Damyan Ivanov <dmn at debian.org>  Tue, 01 Jul 2008 10:08:12 +0300
 
 libaudio-mpd-perl (0.19.1-2) unstable; urgency=low
 

Modified: trunk/libaudio-mpd-perl/lib/Audio/MPD.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/lib/Audio/MPD.pm?rev=22572&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/lib/Audio/MPD.pm (original)
+++ trunk/libaudio-mpd-perl/lib/Audio/MPD.pm Tue Jul  1 07:10:17 2008
@@ -28,7 +28,7 @@
         collection playlist version ] );
 
 
-our $VERSION = '0.19.1';
+our $VERSION = '0.19.2';
 
 Readonly our $REUSE => 0;
 Readonly our $ONCE  => 1;