Parent Directory
| 
Revision Log
| 
Patch
| revision 1.5 by jonen, Mon Dec 16 05:50:07 2002 UTC | revision 1.6 by joko, Mon Dec 16 20:41:51 2002 UTC | |
|---|---|---|
| # | Line 254 sub make_guid | Line 254 sub make_guid |
| 254 | my $self = shift; | my $self = shift; |
| 255 | ||
| 256 | eval ("use Data::UUID;"); | eval ("use Data::UUID;"); |
| 257 | return if $@; | |
| 258 | my $ug = Data::UUID->new(); | my $ug = Data::UUID->new(); |
| 259 | my $guid = $ug->create_str(); | my $guid = $ug->create_str(); |
| 260 |
|
||||||||
| MailToCvsAdmin">MailToCvsAdmin | ViewVC Help |
| Powered by ViewVC 1.1.26 |  |