summary refs log tree commit diff
path: root/xt/tests/Test
diff options
context:
space:
mode:
Diffstat (limited to 'xt/tests/Test')
-rw-r--r--xt/tests/Test/MooseX/UserAgent.pm25
1 files changed, 25 insertions, 0 deletions
diff --git a/xt/tests/Test/MooseX/UserAgent.pm b/xt/tests/Test/MooseX/UserAgent.pm
new file mode 100644
index 0000000..2e04065
--- /dev/null
+++ b/xt/tests/Test/MooseX/UserAgent.pm
@@ -0,0 +1,25 @@
+package Test::MooseX::UserAgent;
+
+use strict;
+use warnings;
+use base 'Test::Class';
+use Test::Exception;
+use Test::More;
+
+sub class { 'MooseX::UserAgent' }
+
+sub startup : Tests(startup => 1) {
+    my $test = shift;
+    use_ok $test->class, "use ok";
+}
+
+sub shutdown : Tests(shutdown) {
+    my $test = shift;
+}
+
+sub constructor : Tests(1) {
+    my $test = shift;
+    can_ok $test->class, 'new';
+}
+
+1;