anchor.diff:      Entry#entry{title = Text};
   atom_entry(Entry, "content", Text) ->
       Entry#entry{description = Text};
  +atom_entry(Entry, "updated", Text) ->
  +    Entry#entry{date = parse_date(Text)};
  +atom_entry(Entry, "published", Text) ->
  +    Entry#entry{date = parse_date(Text)};
  +atom_entry(Entry, "modified", Text) ->
  +    Entry#entry{date = parse_date(Text)};
  +atom_entry(Entry, "issued", Text) ->
  +    Entry#entry{date = parse_date(Text)};
   atom_entry(Entry, _, _) ->
       Entry.
   
  
positive.code: 
  -define(DT0, {{0, 0, 0}, {0, 0, 0}}).
  
  parse_date(S) ->
      lists:foldl(
        fun({RE, Bindings}, undefined) ->
  	      parse_date(S, RE, Bindings);
  	 (_, R) -> R
        end, undefined, [{"(\\d+)-(\\d+)-(\\d+)T(\\d+):(\\d+):(\\d+)", [y,mo,d,h,m,s]},
  	       %% Wed, 20 Apr 2005 19:38:15 +0200
  	       %% Fri, 22 Apr 2005 10:31:12 GMT
  	       {".+?, +(\d+) (.+?) (\d+) (\d+):(\d+):(\d+)", [d,month,y,h,m,s]},
  	       %% 06 May 2007 02:20:00
  	       {"(\d+) (.+?) (\d{4}) (\d\d):(\d\d):(\d\d)", [d,month,y,h,m,s]}]).
  
  parse_date(S, Regex, Bindings) ->
      case re:run(S, Regex, [{capture,all,list}]) of
  
negative.code:     Entry#entry{description = Text};
  rss_channel_item(#entry{description = undefined} = Entry, "description", Text) ->
      Entry#entry{description = Text};
  rss_channel_item(Entry, "pubDate", Text) ->
      Entry#entry{date = parse_date(Text)};
  rss_channel_item(Entry, "dc:date", Text) ->
      Entry#entry{date = parse_date(Text)};
  rss_channel_item(Entry, _, _) ->
      Entry.
  
  