--- a/bin/gearman_decode_worker.pl Sat May 09 23:24:13 2015 +0200
+++ b/bin/gearman_decode_worker.pl Fri Sep 11 23:52:21 2015 +0200
@@ -18,7 +18,7 @@
use Mojo::JSON qw/decode_json/;
use Mojo::Util qw/decode slurp/;
-use Mojo::Loader;
+use Mojo::Loader qw/load_class/;
use File::Temp;
use Gearman::Worker;
use Mojolicious;
@@ -33,10 +33,8 @@
my $config = load_config();
-my $loader = Mojo::Loader->new;
-
my $storage_class = $config->{Storage}->{Type};
-if (my $e = $loader->load($storage_class)) {
+if (my $e = load_class($storage_class)) {
die ref $e ? "Exception: $e" : 'Not found!';
}