[libweasel-perl] 04/11: Fix pre-5.14 package syntax, issue #3

[Robert James Clay]

This is an automated email from the git hooks/post-receive script.

jame-guest pushed a commit to tag v0.10
in repository libweasel-perl.

commit 36d646e53898b148bb04aaca0ad9adc1f57522bb
Author: Brock Wilcox <bwilcox at optoro.com>
Date:   Tue Sep 6 20:28:30 2016 -0400

    Fix pre-5.14 package syntax, issue #3
---
 t/01-logging.t | 32 +++++++++++++++++---------------
 1 file changed, 17 insertions(+), 15 deletions(-)

diff --git a/t/01-logging.t b/t/01-logging.t
index 061e524..0ae98a1 100644
--- a/t/01-logging.t
+++ b/t/01-logging.t
@@ -4,27 +4,29 @@
 use Data::Dumper;
 use Test::More;
 
-package DummyDriver {
-    use Data::Dumper;
-    use Moose;
-    with 'Weasel::DriverRole';
+package DummyDriver;
 
-    sub tag_name {
-        my ($self, $tag) = @_;
+use Data::Dumper;
+use Moose;
+with 'Weasel::DriverRole';
+
+sub tag_name {
+    my ($self, $tag) = @_;
 
-        return $tag->{tag};
-    }
+    return $tag->{tag};
+}
 
-    sub find_all {
-        my @rv = (
-            { tag => 'span' },
-            { tag => 'span' },
-            );
+sub find_all {
+    my @rv = (
+        { tag => 'span' },
+        { tag => 'span' },
+        );
 
-        return (wantarray) ? @rv : \@rv;
-    }
+    return (wantarray) ? @rv : \@rv;
 }
 
+package main;
+
 use Weasel;
 use Weasel::Session;
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libweasel-perl.git