Moo < 1.0 compat fix

[Geo-USCensus-Geocoding.git] / Geocoding / Result.pm

diff --git a/Geocoding/Result.pm b/Geocoding/Result.pm
index bf595ca..4598441 100644 (file)
--- a/Geocoding/Result.pm
+++ b/Geocoding/Result.pm
@@ -2,7 +2,7 @@ package Geo::USCensus::Geocoding::Result;
 
 use Moo; # just for attribute declaration
 
-has 'is_match' => ( is => 'rw', default => 0 );
+has 'is_match' => ( is => 'rw', default => sub { 0 } );
 foreach ( 'content',
           'match_level',
           'address',
@@ -14,7 +14,7 @@ foreach ( 'content',
           'latitude',
           'longitude'
         ) {
-  has $_ => ( is => 'rw', default => '' );
+  has $_ => ( is => 'rw', default => sub { '' } );
 }
 
 sub censustract {