diff --git a/src/ce_libmaneditor.pas b/src/ce_libmaneditor.pas
index 792f0d29..75ebbde9 100644
--- a/src/ce_libmaneditor.pas
+++ b/src/ce_libmaneditor.pas
@@ -900,7 +900,7 @@ begin
       srcc.LoadFromFile(path);
       lex(srcc.Text, toks, @lexFindToken, [lxoNoComments]);
       mnme := getModuleName(toks);
-      if path.extractFileName = 'package.d' then
+      if path.extractFileName.stripFileExt = 'package' then
         mnme := mnme + '.p';
       toks.Clear;
       setLength(fldn, 0);