anchor.diff:  % Utility functions
   integer_to_list_zerofill(N) when is_float(N) ->
       integer_to_list_zerofill(round(N));
  -integer_to_list_zerofill(N) when N < 10 ->
  -    lists:flatten(io_lib:format("~2..0B", [N]));
  +integer_to_list_zerofill(N) when N < 100 ->
  +    [ N div 10 + $0, N rem 10 + $0];
   integer_to_list_zerofill(N) ->
       integer_to_list(N).
  
positive.code: % Month abbreviation in Associated Press style. Proprietary extension.
  tag_to_value($N, {_,M,_}, _, Context) when M =:= 9 ->
     % Special case - "Sept."
     string:sub_string(monthname(M, Context), 1, 4) ++ ".";
  tag_to_value($N, {_,M,_}, _, Context) when M < 3 orelse M > 7 ->
     % Jan, Feb, Aug, Oct, Nov, Dec are all
     % abbreviated with a full-stop appended.
     string:sub_string(monthname(M, Context), 1, 3) ++ ".";
  tag_to_value($N, {_,M,_}, _, Context) ->
     % The rest are the fullname.
     monthname(M, Context);
  
negative.code: 
  % Month, textual, 3 letters; e.g. 'Jan'
  tag_to_value($M, {_,M,_}, _, Context) ->
     z_string:truncate(monthname(M, Context), 3, []);
  
  % Month without leading zeros; i.e. '1' to '12'
  tag_to_value($n, {_, M, _}, _, _Context) ->
  