anchor.diff:  
   open_closed(Status) ->
       open_closed(Status, "open", "closed").
  -open_closed(Status, Open, Closed) ->
  -    case Status#status.status of
  -        <<$1>> -> Open;
  -        <<$0>> -> Closed
  -    end.
  +open_closed(#status{status=?STATUS_OPEN}, Open, _) -> Open;
  +open_closed(_, _, Closed) -> Closed.
   
   
   %% Data access functions
  
positive.code: -define(CT_JSON, {"application/json", to_json}).
  -define(CT_HTML, {"text/html", to_html}).
  -define(CT_EEML, {"text/xml", to_eeml}).
  
  
  %% Webmachine Resource functions
  
negative.code: item_to_json(S) ->
      [{id, S#status.id},
       {timestamp, S#status.timestamp},
       {status, S#status.status == ?STATUS_OPEN}].
  
  
  %% CSV
  