Make sure with_caller handles prototypes correctly as well

diff --git a/t/050_metaclasses/012_moose_exporter.t b/t/050_metaclasses/012_moose_exporter.t
index 5e59d8f..ef9db42 100644 (file)
--- a/t/050_metaclasses/012_moose_exporter.t
+++ b/t/050_metaclasses/012_moose_exporter.t
@@ -8,7 +8,7 @@ use Test::Exception;
 BEGIN {
     eval "use Test::Output;";
     plan skip_all => "Test::Output is required for this test" if $@;
-    plan tests => 62;
+    plan tests => 63;
 }
 
 
@@ -345,6 +345,12 @@ BEGIN {
     }
 
     is(
+        prototype( UseAllOptions->can('with_caller2') ),
+        prototype( AllOptions->can('with_caller2') ),
+        'using correct prototype on with_meta function'
+    );
+
+    is(
         prototype( UseAllOptions->can('with_meta2') ),
         prototype( AllOptions->can('with_meta2') ),
         'using correct prototype on with_meta function'