diff options
author | Rasmus Steinke <rasi@xssn.at> | 2017-09-30 13:48:38 +0200 |
---|---|---|
committer | Rasmus Steinke <rasi@xssn.at> | 2017-09-30 13:48:38 +0200 |
commit | d26df52cf064995b42f7e0e6e8220a6529d01bdf (patch) | |
tree | 797ac18c526f5a64e423fc0528a917f12ec2c387 /clerk | |
parent | 64925211c6b2d3453abb5ba02ae13b6037e7cf97 (diff) | |
download | perl-app-clerk-d26df52cf064995b42f7e0e6e8220a6529d01bdf.tar.gz perl-app-clerk-d26df52cf064995b42f7e0e6e8220a6529d01bdf.tar.xz |
remove debug print, use correct variable for scalar
Diffstat (limited to 'clerk')
-rwxr-xr-x | clerk | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -517,10 +517,9 @@ sub mpd_add_items { } sub mpd_rate_items { - my $rating = @_[1]; + my $rating = $_[1]; chomp $rating; if ($rating eq "Delete Rating") { - print "$rating\n"; $mpd->sticker_value("song", "$_", "rating", undef) for @{$_[0]}; } else { $mpd->sticker_value("song", "$_", "rating", "$rating") for @{$_[0]}; |