From a3780698d885ac0aae79769322ee4389a71fa725 Mon Sep 17 00:00:00 2001
From: huangming <huangminghuang@users.noreply.github.com>
Date: Thu, 22 Jan 2004 20:57:54 +0000
Subject: Merged From Trunk 01-22-04

---
 modules/GUID.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/modules/GUID.pm b/modules/GUID.pm
index 015db9c2..29c95914 100644
--- a/modules/GUID.pm
+++ b/modules/GUID.pm
@@ -35,8 +35,9 @@ sub generate {
   my($val)   = 0xfeca1bad;
 
   return sprintf("%08X-%04X-%04X-%04X-%04X%08X",
-                 $nhash, ($val >> 16) & 0xffff, ($val & 0xffff),
-                 ($ihash >> 16) & 0xffff, $ihash & 0xffff, $chash);
+                 $nhash & 0xffffffff, ($val >> 16) & 0xffff,
+                 ($val & 0xffff), ($ihash >> 16) & 0xffff,
+                 $ihash & 0xffff, $chash & 0xffffffff);
 }
 
 
-- 
cgit v1.2.1