diff --git a/src/ce_common.pas b/src/ce_common.pas
index b4896c28..6d329361 100644
--- a/src/ce_common.pas
+++ b/src/ce_common.pas
@@ -985,7 +985,7 @@ end;
 
 initialization
   dExtList := TStringList.Create;
-  dExtList.AddStrings(['.d', '.D', '.di', '.DI', '.Di', '.dI', '.dd', '.DD']);
+  dExtList.AddStrings(['.d', '.di', '.dd']);
   registerClasses([TCEPersistentShortcut]);
 finalization
   dExtList.Free;