package DBIx::Class::UUIDColumns;
+
+use strict;
+use warnings;
+
use base qw/DBIx::Class/;
__PACKAGE__->mk_classdata( 'uuid_auto_columns' => [] );
if (eval{require Data::UUID}) {
return '::Data::UUID';
} elsif ($^O ne 'openbsd' && eval{require APR::UUID}) {
- # APR::UUID on openbsd causes some as yet unfound nastyness for XS
+ # APR::UUID on openbsd causes some as yet unfound nastiness for XS
return '::APR::UUID';
} elsif (eval{require UUID}) {
return '::UUID';