$conn->remote_sub obsoletes SubCaller
Matt S Trout [Mon, 11 Jun 2012 23:18:25 +0000 (00:18 +0100)]
lib/Object/Remote/SubCaller.pm [deleted file]

diff --git a/lib/Object/Remote/SubCaller.pm b/lib/Object/Remote/SubCaller.pm
deleted file mode 100644 (file)
index ff5fb40..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-package Object::Remote::SubCaller;
-
-use Module::Runtime qw(use_module);
-
-sub new { bless({}, ref($_[0])||$_[0]) }
-
-sub call {
-  my ($self, $name, @args) = @_;
-  my ($pkg, $sub_name) = $name =~ /^(.+)::([^:]+)$/
-    or die "Couldn't split ${name} into package and sub";
-  if (my $sub = use_module($pkg)->can($sub_name)) {
-    return $sub->(@args);
-  } else {
-    die "No subroutine ${sub_name} in package ${pkg}";
-  }
-}
-
-1;