diff --git a/packager/packageeditor.pas b/packager/packageeditor.pas
index 79ed3c0385..bcefdb85b0 100644
--- a/packager/packageeditor.pas
+++ b/packager/packageeditor.pas
@@ -2022,7 +2022,7 @@ begin
   // check if directory is already in the unit path of the package
   NewDirectory:=ExtractFilePath(AnUnitFilename);
   ShortDirectory:=NewDirectory;
-  LazPackage.ShortenFilename(ShortDirectory,false);
+  LazPackage.ShortenFilename(ShortDirectory,true);
   if ShortDirectory='' then exit;
   LazPackage.LongenFilename(NewDirectory);
   NewDirectory:=ChompPathDelim(NewDirectory);