[Bast-commits] r3469 - trunk/DBIx-Class-InflateColumn-IP/lib/DBIx/Class/InflateColumn

[ilmari at dev.catalyst.perl.org]

Author: ilmari
Date: 2007-06-03 23:54:36 +0100 (Sun, 03 Jun 2007)
New Revision: 3469

Modified:
   trunk/DBIx-Class-InflateColumn-IP/lib/DBIx/Class/InflateColumn/IP.pm
Log:
Fix typo in ip_class fallback.


Modified: trunk/DBIx-Class-InflateColumn-IP/lib/DBIx/Class/InflateColumn/IP.pm
===================================================================
--- trunk/DBIx-Class-InflateColumn-IP/lib/DBIx/Class/InflateColumn/IP.pm	2007-06-03 00:04:36 UTC (rev 3468)
+++ trunk/DBIx-Class-InflateColumn-IP/lib/DBIx/Class/InflateColumn/IP.pm	2007-06-03 22:54:36 UTC (rev 3469)
@@ -88,7 +88,7 @@
 
     my $ip_format = $info->{ip_format} || _default_format($info->{data_type})
         || $self->ip_format || 'addr';
-    my $ip_class = $info->{ip_class} || $self->ip_class || 'NetAddr::IPf';
+    my $ip_class = $info->{ip_class} || $self->ip_class || 'NetAddr::IP';
 
     eval "use $ip_class";
     $self->throw_exception("Error loading $ip_class: $@") if $@;