[SCM] libmessage-passing-perl Debian packaging branch, master, updated. debian/0.111-3-14-g44f6e88

Tomas Doran bobtfish at bobtfish.net
Mon May 6 11:57:26 UTC 2013


The following commit has been merged in the master branch:
commit 90eb9b056ac84581d99b13f88b6cb6b8053abdfc
Author: Tomas Doran <bobtfish at bobtfish.net>
Date:   Sun Jul 15 19:32:06 2012 +0100

    More cleanups

diff --git a/lib/Message/Passing/Manual/Components.pod b/lib/Message/Passing/Manual/Components.pod
index 552d7e1..cc06ef1 100644
--- a/lib/Message/Passing/Manual/Components.pod
+++ b/lib/Message/Passing/Manual/Components.pod
@@ -17,7 +17,7 @@ the script.
 An example of doing this is:
 
     package Message::Passing::Script::WebHooks;
-    use Moose;
+    use Moo;
     use namespace::clean -except => 'meta';
 
     extends 'Message::Passing';
diff --git a/lib/Message/Passing/Manual/Concepts.pod b/lib/Message/Passing/Manual/Concepts.pod
index eb6a598..9ae9c17 100644
--- a/lib/Message/Passing/Manual/Concepts.pod
+++ b/lib/Message/Passing/Manual/Concepts.pod
@@ -21,7 +21,7 @@ An output is simply a class with a C<consume> method. This will be called with a
 as it's only parameter, like this:
 
     $output->consume($message);
-    
+
 Outputs are expected to compose L<Message::Passing::Role::Output>.
 
 =head2 INPUTS
@@ -30,9 +30,9 @@ An input is simply a class with an C<output_to> attribute. Your code just calls
 method on it's output, like this:
 
     $self->output_to->consume($message);
-    
+
 Outputs are expected to compose L<Message::Passing::Role::Input> which provides this attribute, and
-use the C<BUILD> method from Moose to do any work needed to start listening for events.
+use the C<BUILD> method from L<Moo> to do any work needed to start listening for events.
 
 =head2 FILTER
 
diff --git a/lib/Message/Passing/Role/CLIComponent.pm b/lib/Message/Passing/Role/CLIComponent.pm
index c8f00f1..13c937e 100644
--- a/lib/Message/Passing/Role/CLIComponent.pm
+++ b/lib/Message/Passing/Role/CLIComponent.pm
@@ -19,7 +19,7 @@ sub make_variant {
 
     $arguments{'option'}->("$name" =>
             format => 's',
-#            isa => Str,
+            isa => Str,
             is => 'ro',
 #            required => "$has_default" ? 0 : 1,
             "$has_default" ? ( default => sub { "$default" } ) : (),
@@ -50,7 +50,7 @@ Message::Passing::Role::CLIComponent - Role providing 'foo' and 'foo_options' at
 =head1 SYNOPSIS
 
     package My::Message::Passing::Script;
-    use Moose;
+    use Moo;
 
     with
         'Message::Passing::Role::CLIComponent' => { name => 'input', default => 'STDIN' },

-- 
libmessage-passing-perl Debian packaging



More information about the Pkg-perl-cvs-commits mailing list