anchor.diff:          
           (publishedPosts |> Seq.toArray).[startOf..endOf]
   
  +    let EntryToPagePreview entry = 
  +        let item : PagePreview = {
  +            ID = entry.ID
  +            PubDate = entry.PubDate
  +            Title = entry.Title
  +            Slug = entry.Slug
  +        }
  +        item
  +
   
   
   
  
positive.code:         Content : string
          [<field : DataMember(Name="Published")>]
          Published : bool
      }
      [<DataContract>]
      type Page = {
  
negative.code:     let items = [
          for el in doc.Descendants(xn "item") ->
              {
                  ID = el.Element(wordpressNS + "post_id").Value |> int
                  Slug = el.Element(wordpressNS + "post_name").Value
                  Title = el.Element(xn "title").Value
                  PubDate = el.Element(xn "pubDate").Value |> ParseDate
                  Content = el.Element(contentNS + "encoded").Value
                  Published = if String.Compare(el.Element(wordpressNS + "status").Value, "publish") > -1 then true else false
                  NextPage = None
                  PrevPage = None
              }
      ]
  
  