--- a/Win32OperatingSystem.st Wed Nov 08 12:18:08 2006 +0100
+++ b/Win32OperatingSystem.st Wed Nov 08 12:21:01 2006 +0100
@@ -3598,7 +3598,7 @@
getLinkTarget:aPathName
"given a filename, which represents a link-file (.lnk),
- return its reolved path, or nil"
+ return its resolved path, or nil"
|resolvedPath|
@@ -3682,7 +3682,7 @@
"
"Created: / 07-11-2006 / 10:52:44 / cg"
- "Modified: / 07-11-2006 / 16:02:55 / cg"
+ "Modified: / 08-11-2006 / 12:20:33 / cg"
!
linkFile:oldPath to:newPath
@@ -4839,7 +4839,7 @@
}
}
%}.
- (aPathName asFilename hasSuffix:'lnk') ifTrue:[
+ (aPathName endsWith:'.lnk') ifTrue:[
type := #symbolicLink.
path := self getLinkTarget:aPathName.
].
@@ -4892,7 +4892,7 @@
OperatingSystem linkInfoOf:'C:\Dokumente und Einstellungen\cg\Favoriten\Incoming.lnk'
"
- "Modified: / 07-11-2006 / 16:26:32 / cg"
+ "Modified: / 08-11-2006 / 12:20:13 / cg"
!
mimeTypeForSuffix:aFileSuffix
@@ -12616,7 +12616,7 @@
!Win32OperatingSystem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.248 2006-11-08 11:18:08 fm Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.249 2006-11-08 11:21:01 cg Exp $'
! !
Win32OperatingSystem initialize!