anchor.diff:  		      end,
   	    Item = {Title, Link, Desc, Creator, GregSecs},
   	    Res = dets:insert(?DB, ?ITEM(App, Tag, Counter, Item)),
  -	    io:format("Inserted item ~p~n",[Counter]),
   	    set_counter(?DB, Counter),
   	    {State#s{counter = Counter}, Res};
   	false ->
  
positive.code: 			Acc
  		end,
  	    Items = sort_items(expired(State, dets:foldl(F, [], ?DB))),
  	    io:format("Retrieve ~p items for App=~p~n",[length(Items),App]),
  	    Xml = to_xml(Items),
  	    {State, {ok, Xml}};
  	false ->
  
negative.code: to_xml([{Title, Link, Desc, Creator, GregSecs}|Tail]) ->
      Date = w3cdtf(GregSecs),
      [["<item>\n",
        "<title>", yaws_api:htmlize(Title), "</title>\n",
        "<link>", Link, "</link>\n",
        "<guid>", Link, "</guid>\n",
        "<description>", yaws_api:htmlize(Desc), "</description>\n",
        "<dc:creator>", Creator, "</dc:creator>\n",
        "<dc:date>", Date, "</dc:date>\n",
        "</item>\n"] | 
  