diff -r 6a92b8ed3a2e -r a3017684fcd3 UUID.st --- a/UUID.st Thu Aug 02 19:33:33 2012 +0200 +++ b/UUID.st Fri Aug 03 20:59:12 2012 +0200 @@ -776,20 +776,24 @@ " ! ! -!UUID methodsFor:'queries'! +!UUID methodsFor:'testing'! isTimestampUUID ^ self version == 1 +! + +isUUID + ^ true ! ! !UUID class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.39 2012-04-24 18:08:18 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.40 2012-08-03 18:59:12 stefan Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.39 2012-04-24 18:08:18 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.40 2012-08-03 18:59:12 stefan Exp $' ! ! UUID initialize!