--- units/units.texinfo
+++ units/units.texinfo
@@ -13,11 +13,10 @@
 
 @c noman
 @ifinfo
-@format
-START-INFO-DIR-ENTRY
+@dircategory Office
+@direntry
 * units: (units).	Units conversion.
-END-INFO-DIR-ENTRY
-@end format
+@end direntry
 @end ifinfo
 
 @ifinfo