anchor.diff:  format_human(txt, OpenClosed, Since) ->
       ["H.A.C.K. is currently ", OpenClosed, " since ", Since, "\n"].
   
  -xml_history() ->
  -    Children = lists:map(fun status_xml/1,
  -                         get_date_ordered_statuses(ascending, all_remaining)),
  +xml_history(History) ->
  +    Children = lists:map(fun status_xml/1, History),
       xmerl:export_simple([{history, Children}], xmerl_xml).
   
   format_xml(Status) ->
  
positive.code:          Error -> Error
      end.
  
  get_date_ordered_statuses(OrderDir, Number) ->
      {atomic, Rows} = mnesia:transaction(fun() ->
          TH = mnesia:table(hacksense_status),
  
negative.code: 
  home_page() -> {ok, Content} = home_dtl:render([]), Content.
  
  html_history(History) ->
      Events = [{S#hacksense_status.id, timestamp_to_isofmt(S),
                 status_to_open_closed(S)} || S <- History],
      {ok, Content} = history_html_dtl:render([{events, Events}]),
      Content.
  
  csv_history(History) ->
      lists:map(fun format_csv/1, History).
  
  format_human(Format, Status) ->
      OpenClosed = status_to_open_closed(Status),
  