diff -ru 0.wyrd-1.4.1/interface_main.ml wyrd-1.4.1/interface_main.ml
--- 0.wyrd-1.4.1/interface_main.ml	Thu Jan  6 22:51:10 2011
+++ wyrd-1.4.1/interface_main.ml	Thu Jan  6 23:13:08 2011
@@ -517,7 +517,7 @@
       substitute_aux [
          (Str.regexp "%monname%", Utility.string_of_tm_mon tm.Unix.tm_mon);
          (Str.regexp "%mon%", string_of_int (succ tm.Unix.tm_mon));
-         (Str.regexp "%mday%", string_of_int tm.Unix.tm_mday);
+         (Str.regexp "%mday%", Printf.sprintf "%2d" tm.Unix.tm_mday);
          (Str.regexp "%year%", string_of_int (tm.Unix.tm_year + 1900));
          (Str.regexp "%hour%", Printf.sprintf "%.2d" tm.Unix.tm_hour);
          (Str.regexp "%min%", Printf.sprintf "%.2d" tm.Unix.tm_min);