From 7f034ba0902bacfcada8c1d14e02b93d6b3a56f5 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Mon, 7 May 2007 04:44:39 +0000
Subject: [PATCH] basic test for toHex

---
 t/Session/Id.t | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/t/Session/Id.t b/t/Session/Id.t
index 150bb006e..ace8156b5 100644
--- a/t/Session/Id.t
+++ b/t/Session/Id.t
@@ -53,7 +53,7 @@ my @testSets = (
 
 my $session = WebGUI::Test->session;
 
-plan tests => scalar(@testSets) + 3;
+plan tests => scalar(@testSets) + 4;
 
 # generate
 my $generateId = $session->id->generate();
@@ -75,3 +75,7 @@ foreach my $testSet (@testSets) {
 	is($session->id->valid($testSet->{guid}), $testSet->{valid}, $testSet->{comment});
 }
 
+# 
+# 
+
+is($session->id->toHex('wjabZsKOb7kBBSiO3bQwzA'), 'c2369b66c28e6fb90105288eddb430cc', 'toHex works');