[Bps-public-commit] App-Changeloggr branch, master, updated. 069134859507784c15d1956371324582f79e7d8d

[sartak at bestpractical.com]

The branch, master has been updated
       via  069134859507784c15d1956371324582f79e7d8d (commit)
      from  980c1b9acfe0a50eafba66636b87a34ac0d05df4 (commit)

Summary of changes:
 Makefile.PL                            |    2 +-
 lib/App/Changeloggr/Model/Changelog.pm |    4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

- Log -----------------------------------------------------------------
commit 069134859507784c15d1956371324582f79e7d8d
Author: Shawn M Moore <sartak at gmail.com>
Date:   Thu Feb 26 22:13:38 2009 -0500

    Use Data::GUID instead of Data::UUID

diff --git a/Makefile.PL b/Makefile.PL
index 7a768a0..a5baa97 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -5,6 +5,6 @@ version     '0.01';
 
 requires    'Jifty' => '0.90220';
 requires    'JiftyX::ModelHelpers' => '0.22';
-requires    'Data::UUID';
+requires    'Data::GUID';
 
 WriteAll;
diff --git a/lib/App/Changeloggr/Model/Changelog.pm b/lib/App/Changeloggr/Model/Changelog.pm
index 1575162..a0b5a29 100644
--- a/lib/App/Changeloggr/Model/Changelog.pm
+++ b/lib/App/Changeloggr/Model/Changelog.pm
@@ -21,8 +21,8 @@ use App::Changeloggr::Record schema {
 };
 
 sub _generate_admin_token {
-    require Data::UUID;
-    Data::UUID->new->create_str;
+    require Data::GUID;
+    Data::GUID->new->as_string;
 }
 
 sub current_user_can {

-----------------------------------------------------------------------