From a556ccee86cac8093fa4f62fb340d94e6c10517d Mon Sep 17 00:00:00 2001
From: David Baird <cpan.zerofive@googlemail.com>
Date: Sat, 20 Aug 2005 12:49:48 +0000
Subject: [PATCH] return $id from Mp::Session::generate_unique_id - bug 14124

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@374 48953598-375a-da11-a14b-00016c27c3ee
---
 Changes                | 1 +
 lib/Maypole/Session.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index c5192b3..aad9d28 100644
--- a/Changes
+++ b/Changes
@@ -9,6 +9,7 @@ For information about current developments and future releases, see:
     Template xhtml validation (bug 13975)
     Simplified Net::Amazon example (bug 14073)
     Apache2 fix in Apache::MVC (bug 13888)
+    Maypole::Session::generate_unique_id() now returns the id (bug 14124)
 
 2.10 Tue 19 Jul 2005
     Multiple Template Paths added ( http://rt.cpan.org/NoAuth/Bug.html?id=13447 )
diff --git a/lib/Maypole/Session.pm b/lib/Maypole/Session.pm
index 309ff38..cde28dc 100644
--- a/lib/Maypole/Session.pm
+++ b/lib/Maypole/Session.pm
@@ -35,7 +35,7 @@ our $VERSION = 0.01;
 sub generate_unique_id {
     my $length = shift || 32;
     my $id = substr(Digest::MD5::md5_hex(Digest::MD5::md5_hex(time(). {}. rand(). $$)), 0, $length);
-    return;
+    return $id;
 }
 
 
-- 
2.39.5