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