From: Dagfinn Ilmari Mannsåker <ilmari@ilmari.org>
Date: Sun, 19 Jan 2014 19:03:37 +0000 (+0000)
Subject: Explicitly use default names for builders and clearers
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5c5701c217efb7a8d1df9abcf082307e0bc0567b;p=dbsrgits%2FSQL-Abstract.git

Explicitly use default names for builders and clearers

The attributes that specified explicit builder or clearer names were
specifying the defaut name anyway, so just use => 1 instead.
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 48fccc3..8a0bae9 100644
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -27,7 +27,7 @@ sub puke (@) {
   Carp::croak "[$func] Fatal: ", @_;
 }
 
-has converter => (is => 'lazy', clearer => 'clear_converter');
+has converter => (is => 'lazy', clearer => 1);
 
 has case => (
   is => 'ro', coerce => quote_sub( q{ $_[0] eq 'lower' ? 'lower' : undef } ),
@@ -64,7 +64,7 @@ has injection_guard => (
   })
 );
 
-has renderer => (is => 'lazy', clearer => 'clear_renderer');
+has renderer => (is => 'lazy', clearer => 1);
 
 has name_sep => (
   is => 'rw', default => '.',
@@ -100,7 +100,7 @@ has convert => (is => 'ro');
 has array_datatypes => (is => 'ro');
 
 has converter_class => (
-  is => 'rw', lazy => 1, builder => '_build_converter_class',
+  is => 'rw', lazy => 1, builder => 1,
   trigger => quote_sub( q{ $_[0]->clear_converter } ),
 );