pandoc-lens 0.4.0 → 0.4.1

raw patch · 2 files changed

+25/−1 lines, 2 files

Files

• Text/Pandoc/Lens.hs +24/−0
• pandoc-lens.cabal +1/−1

@@ -62,6 +62,9 @@     , _MetaBlocks       -- * Attributes     , HasAttr(..)+    , attrIdentifier+    , attrClasses+    , attrs     ) where  import Control.Applicative@@ -84,6 +87,15 @@     type Unwrapped Meta = Map String MetaValue     _Wrapped' = iso unMeta Meta +type instance Index Meta = String+type instance IxValue Meta = MetaValue++instance Ixed Meta where+  ix k = _Wrapped' . ix k++instance At Meta where+  at k = _Wrapped' . at k+ -- | A prism on a 'Plain' 'Block' _Plain :: Prism' Block [Inline] _Plain = prism' Plain f@@ -389,3 +401,15 @@     attributes f (Code a s) = fmap (\a'->Code a' s) (f a)     attributes f (Span a s) = fmap (\a'->Span a' s) (f a)     attributes _ x = pure x++-- | A lens onto identifier of an 'Attr'+attrIdentifier :: Lens' Attr String+attrIdentifier = _1++-- | A lens onto classes of an 'Attr'+attrClasses :: Lens' Attr [String]+attrClasses = _2++-- | A lens onto the key-value pairs of an 'Attr'+attrs :: Lens' Attr [(String, String)]+attrs = _3

@@ -1,5 +1,5 @@ name:                pandoc-lens-version:             0.4.0+version:             0.4.1 synopsis:            Lenses for Pandoc documents description:         Lenses for Pandoc documents homepage:            http://github.com/bgamari/pandoc-lens