-- | The List of Posts for this Blog.
bpItems :: Lens' BlogPosts [Post']
bpItems
  = lens _bpItems (\ s a -> s{_bpItems = a}) . _Default
      . _Coerce
bpItems :: Lens' BlogPosts [Post']
bpItems
  = lens _bpItems (\ s a -> s{_bpItems = a}) . _Default
      . _Coerce
bpItems
  = lens _bpItems (\ s a -> s{_bpItems = a}) . _Default
      . _Coerce