--- a/DirectoryContentsBrowser.st	Sat Jul 09 15:48:58 2011 +0200
+++ b/DirectoryContentsBrowser.st	Sat Jul 09 15:53:19 2011 +0200
@@ -1112,7 +1112,7 @@
 !
 
 enterActionFor:anItem
-    | filename info targetItem targetFile|
+    | filename info targetItem linkFile targetFile|
 
     filename := anItem fileName.
 
@@ -1129,7 +1129,12 @@
     ] whileTrue:[
         targetItem := nil.
         info path isNil ifTrue:[^ self].
-        targetFile := filename directory construct:info path.
+        linkFile := info path asFilename.   
+        linkFile isRelative ifTrue:[
+            targetFile := filename directory construct:info path.
+        ] ifFalse:[
+            targetFile := linkFile            
+        ]
     ].
 
     filename := targetFile.
@@ -1148,6 +1153,7 @@
 "/    ]
 
     "Modified: / 25-07-2006 / 09:08:00 / cg"
+    "Modified: / 09-07-2011 / 14:52:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 noOfAddedFiles:noOfAddedFiles noOfFiles:noOfFiles
@@ -3329,9 +3335,9 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.238 2011-05-03 15:48:14 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.239 2011-07-09 13:53:19 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.238 2011-05-03 15:48:14 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.239 2011-07-09 13:53:19 vrany Exp $'
 ! !