--- a/PerforceSourceCodeManager.st	Thu Apr 11 18:28:54 2019 +0200
+++ b/PerforceSourceCodeManager.st	Thu Apr 11 18:37:15 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2006 by eXept Software AG
               All Rights Reserved
@@ -673,13 +675,15 @@
 
     modulePath :=  moduleName , '/' , packageDir.
 
-    inDirectory := (Filename currentDirectory asAbsoluteFilename) pathName.
+    inDirectory := Filename currentDirectory pathName.
     workSpace := self getWorkSpaceForPackage:moduleName.
-    ^workSpace notNil
+    ^ workSpace notNil
 
 "
     self checkForExistingModule:'testModule' directory:'libTestPerforce'
 "
+
+    "Modified: / 11-04-2019 / 18:06:49 / Stefan Vogel"
 !
 
 checkin:containerFilename text:someText directory:packageDir module:moduleName logMessage:logMessage force:force onBranch:branchNameOrNil