diff --git a/lib/Mason/Filters/Standard.pm b/lib/Mason/Filters/Standard.pm index 17d8b1ea..e66d5471 100644 --- a/lib/Mason/Filters/Standard.pm +++ b/lib/Mason/Filters/Standard.pm @@ -107,7 +107,7 @@ Remove lines with only whitespace from content. This hello - world + world % }} yields diff --git a/lib/Mason/Interp.pm b/lib/Mason/Interp.pm index ae341a5a..c48c6490 100644 --- a/lib/Mason/Interp.pm +++ b/lib/Mason/Interp.pm @@ -896,7 +896,7 @@ Extension to add to the end of object files. Default is ".mobj". A list of plugins and/or plugin bundles: plugins => [ - 'OnePlugin', + 'OnePlugin', 'AnotherPlugin', '+My::Mason::Plugin::AThirdPlugin', '@APluginBundle', diff --git a/lib/Mason/Manual/Components.pod b/lib/Mason/Manual/Components.pod index cbf27934..72dcd4b3 100644 --- a/lib/Mason/Manual/Components.pod +++ b/lib/Mason/Manual/Components.pod @@ -123,7 +123,7 @@ Use Moose 'has' syntax to declare attributes within a C<< <%class> >> section: =head2 Attributes are read-write by default - + L imports L into all components, which makes attributes read-write unless stated otherwise. This is not considered best @@ -345,7 +345,7 @@ C: 4 *_m_buffer = \$Mason::Request::current_buffer; 5 sub _inner { inner() } 6 my $_class_cmeta; - 7 + 7 8 method _set_class_cmeta ($interp) { 9 $_class_cmeta = $interp->component_class_meta_class->new( 10 'class' => CLASS, @@ -358,7 +358,7 @@ C: 17 ); 18 } 19 sub _class_cmeta { $_class_cmeta } - 20 + 20 21 method main { 22 #line 1 "/home/myapp/comps/hi.mc" 23 $$_m_buffer .= 'Hi there! The time is '; @@ -367,7 +367,7 @@ C: 26 #line 1 "/home/myapp/comps/hi.mc" 27 $$_m_buffer .= '. 28 '; - 29 + 29 30 return; 31 } diff --git a/lib/Mason/Manual/Cookbook.pod b/lib/Mason/Manual/Cookbook.pod index 11442e2e..3e39b20a 100644 --- a/lib/Mason/Manual/Cookbook.pod +++ b/lib/Mason/Manual/Cookbook.pod @@ -7,10 +7,10 @@ Mason::Manual::Cookbook - Recipes for common Mason tasks =head2 HTML list formed from array -
    - % foreach $item (@list) { -
  • <% $item %>
  • - % } +
      + % foreach $item (@list) { +
    • <% $item %>
    • + % }
    =head2 HTML table formed from list of objects diff --git a/lib/Mason/Manual/Filters.pod b/lib/Mason/Manual/Filters.pod index 655d6c99..148fb27c 100644 --- a/lib/Mason/Manual/Filters.pod +++ b/lib/Mason/Manual/Filters.pod @@ -165,22 +165,22 @@ Here's a filter package that implements two filters, C and C: package MyApp::Filters; use Mason::PluginRole; - + method Upper () { return sub { uc($_[0]) } } - + method Lower () { return sub { lc($_[0]) } } - + 1; To use these in a component: <%class> with 'MyApp::Filters'; - + % $.Upper {{ ... @@ -251,7 +251,7 @@ L for their implementations. =head2 <%filter> block -You can use the C<< <%filter> >> block to define filters that output content. +You can use the C<< <%filter> >> block to define filters that output content. It works just like a C<< <%method> >> block, except that you can call C<< $yield->() >> to generate the original content. e.g. diff --git a/lib/Mason/Manual/Plugins.pod b/lib/Mason/Manual/Plugins.pod index 9a4c8773..7da0f482 100644 --- a/lib/Mason/Manual/Plugins.pod +++ b/lib/Mason/Manual/Plugins.pod @@ -23,7 +23,7 @@ Pass a list of plugin specs to the Mason constructor: Mason->new(plugins => [ - 'OnePlugin', + 'OnePlugin', 'AnotherPlugin', '+My::Mason::Plugin::AThirdPlugin', '@APluginBundle', @@ -157,7 +157,7 @@ looks like this: package Mason::PluginBundle::MyBundle use Moose; with 'Mason::PluginBundle'; - + sub requires_plugins { return ( 'A', @@ -167,29 +167,29 @@ looks like this: '+My::PluginBundle::E', ); } - + 1; - + __END__ - + =pod - + =head1 NAME - + Mason::PluginBundle::MyBundle - My plugin bundle - + =head1 INCLUDED PLUGINS - + =over - + =item A =item B =item +My::Plugin::C =item @D =item +My::PluginBundle::E - + =back - + .... The C method returns a list of entries, with the same syntax diff --git a/lib/Mason/t/Filters.pm b/lib/Mason/t/Filters.pm index 7421469c..cfcffe05 100644 --- a/lib/Mason/t/Filters.pm +++ b/lib/Mason/t/Filters.pm @@ -29,9 +29,9 @@ method Upper () { sub { uc(shift) } } Hello World. % }} # end Upper -% sub { ucfirst(shift) } {{ +% sub { ucfirst(shift) } {{ <% "hello world?" %> -% }} +% }} % sub { tr/A-Z/a-z/; $_ } {{ Hello World!