turn on :utf8 everywhere with utf8::all

[mpd-feeder.git] / bin / mpd-feeder

diff --git a/bin/mpd-feeder b/bin/mpd-feeder
index 53c826578840f3900e08e14472539117a4ba6073..bc73a73aa7988ed57df18108c8281dc8d8f4f5df 100755 (executable)
--- a/bin/mpd-feeder
+++ b/bin/mpd-feeder
@@ -2,14 +2,13 @@
 
 use strict;
 use warnings;
-use utf8;
+use utf8::all;
 
 use App::MPD::Feeder;
-use App::MPD::Feeder::Options;
 use Log::Any qw($log);
 use Log::Any::Adapter Stderr => log_level => 'error';
 
-my $feeder = Feeder->new();
+my $feeder = App::MPD::Feeder->new();
 
 if (@ARGV) {
     my $cmd = shift @ARGV;
@@ -70,20 +69,4 @@ if (@ARGV) {
     }
 }
 
-$feeder->connect_db;
-
-for ( ;; ) {
-    $feeder->queue_songs( undef, sub { $feeder->run } );
-
-    $log->debug("Entering event loop. PID=$$");
-
-    my $result = $feeder->mpd->loop->run;
-    $log->trace( "Got loop result of " . ( $result // 'undef' ) );
-
-    if ('reload' eq $result) {
-        $log->notice("disconnecting");
-        $feeder->stop;
-
-        exec( "$0", '--config', $feeder->cfg_file, '--skip-db-update' );
-    }
-}
+$feeder->run_loop;