Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
code deobfuscated:
authorClaus Gittinger <cg@exept.de>
Tue, 09 Mar 2010 13:09:53 +0100
changeset 12775 71dfc35f62d2
parent 12774 3d5e2c85faef
child 12776 66d952ead2af
code deobfuscated: expr not ifTrue: -> expr ifFalse:
PCFilename.st file | annotate | diff | comparison | revisions 
--- a/PCFilename.st	Mon Mar 08 18:59:47 2010 +0100
+++ b/PCFilename.st	Tue Mar 09 13:09:53 2010 +0100
@@ -484,7 +484,7 @@
     "return true, if is is a drive"
     |pathName|
 
-    self isRootDirectory not ifTrue:[^ false].
+    self isRootDirectory ifFalse:[^ false].
 
     pathName := self asString asLowercase.
 
@@ -507,7 +507,7 @@
     "return true, if is is a drive"
     |pathName|
 
-    self isRootDirectory not ifTrue:[^ false].
+    self isRootDirectory ifFalse:[^ false].
 
     pathName := self asString asLowercase.
 
@@ -879,9 +879,9 @@
 !PCFilename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.49 2009-10-28 14:02:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.50 2010-03-09 12:09:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.49 2009-10-28 14:02:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.50 2010-03-09 12:09:53 cg Exp $'
 ! !
hg/stx-libbasic