X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FUUIDMaker%2FAPR%2FUUID.pm;fp=lib%2FDBIx%2FClass%2FUUIDMaker%2FAPR%2FUUID.pm;h=65305f0dd2f07b5da69d79afa8a436f0453a933c;hb=947acfd929fb4d83f467581114228eb0682b41c9;hp=0000000000000000000000000000000000000000;hpb=675ba05a29c8efa59767d8c3b15d1adb1835ca10;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/UUIDMaker/APR/UUID.pm b/lib/DBIx/Class/UUIDMaker/APR/UUID.pm
new file mode 100644
index 0000000..65305f0
--- /dev/null
+++ b/lib/DBIx/Class/UUIDMaker/APR/UUID.pm
@@ -0,0 +1,9 @@
+package DBIx::Class::UUIDMaker::APR::UUID;
+use base qw/DBIx::Class::UUIDMaker/;
+use APR::UUID ();
+
+sub as_string {
+    return APR::UUID->new->format;
+};
+
+1;