X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FApp%2FSCS%2FPage.pm;h=009905548db8abc1eb6fb4b299b6eb1f42515245;hb=6b35e5c5a6e8b1f151367c3c09430f16f4603db3;hp=9a01b9e77c0553f0f1b7dc3293917a62f3ead856;hpb=d0194f50a27b5a920a0ef5e2d01bc524a08d10a8;p=scpubgit%2FApp-SCS.git

diff --git a/lib/App/SCS/Page.pm b/lib/App/SCS/Page.pm
index 9a01b9e..0099055 100644
--- a/lib/App/SCS/Page.pm
+++ b/lib/App/SCS/Page.pm
@@ -7,7 +7,7 @@ use Module::Runtime qw(use_module);
 use HTML::Zoom;
 use Moo;
 
-has "_$_" => (is => 'ro', init_arg => $_) for qw(page_set);
+has $_ => (is => 'ro', reader => "_$_", init_arg => $_) for qw(page_set);
 
 sub _page_set_class { ref($_[0]->_page_set) }
 sub _top_dir { $_[0]->_page_set->top_dir }