From 0d3ed08cfbcf0808a30e4cc43d2389693de396fa Mon Sep 17 00:00:00 2001
From: diegok <diego@freekeylabs.com>
Date: Tue, 25 Dec 2012 23:44:56 +0100
Subject: [PATCH] Minimal POD for nacked methods

---
 lib/WWW/EZTV.pm    | 4 ++--
 lib/WWW/EZTV/UA.pm | 4 ++++
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/lib/WWW/EZTV.pm b/lib/WWW/EZTV.pm
index 98ed361..6166418 100644
--- a/lib/WWW/EZTV.pm
+++ b/lib/WWW/EZTV.pm
@@ -11,13 +11,13 @@ has url_shows => ( is => 'ro', lazy => 1, default => sub { shift->url->clone->pa
 has shows => 
     is      => 'ro',
     lazy    => 1,
-    default => \&build_shows,
+    builder => '_build_shows',
     handles => {
         find_show    => 'first',
         has_shows    => 'size',
     };
 
-sub build_shows {
+sub _build_shows {
     my $self = shift;
 
     $self->get_response( $self->url_shows )->dom->find('table.forum_header_border tr[name="hover"]')->map(sub {
diff --git a/lib/WWW/EZTV/UA.pm b/lib/WWW/EZTV/UA.pm
index f2fbeeb..41df609 100644
--- a/lib/WWW/EZTV/UA.pm
+++ b/lib/WWW/EZTV/UA.pm
@@ -2,8 +2,12 @@ package WWW::EZTV::UA;
 use Moose::Role;
 use Mojo::UserAgent;
 
+# ABSTRACT: User agent for EZTV scrapper.
+
 has ua  => ( is => 'ro', lazy => 1, default => sub { $EZTV::Global::UA || ($EZTV::Global::UA = Mojo::UserAgent->new) } );
 
+=method get_response
+=cut
 sub get_response {
     my ($self, $url) = (shift, shift);
 
-- 
2.20.1