xt for bridged remote objects

[scpubgit/Object-Remote.git] / xt / lib / TestBridge.pm

diff --git a/xt/lib/TestBridge.pm b/xt/lib/TestBridge.pm
new file mode 100644 (file)
index 0000000..7a8b82a
--- /dev/null
+++ b/xt/lib/TestBridge.pm
@@ -0,0 +1,13 @@
+package TestBridge;
+use Moo;
+
+use TestClass;
+use Object::Remote;
+
+has object => (is => 'lazy');
+
+sub _build_object { TestClass->new::on('root@') }
+
+sub result { (shift)->object->result }
+
+1;