diff --git a/lcl/update_allunits.lpr b/lcl/update_allunits.lpr
index d49efe7252..f74f288b33 100644
--- a/lcl/update_allunits.lpr
+++ b/lcl/update_allunits.lpr
@@ -62,7 +62,7 @@ begin
     Source.Add('interface');
     Source.Add('uses');
     for i:=0 to Units.Count-1 do begin
-      s:='  '+Units[i];
+      s:='  '+Units[i]+'{%H-}';
       if i=Units.Count-1 then
         s:=s+';'
       else