@@ -175,7 +175,7 @@ named n f s
175175
176176-- | Old name for 'named'
177177ell :: Text -> Traversal' Element Element
178−ell = named . CI.mk
178+ell n = named $ CI.mk n
179179
180180-- | Traverse elements which has the specified name.
181181el :: Name -> Traversal' Element Element
@@ -213,4 +213,4 @@ comment = nodes . traverse . _Comment
213213-- | 'plate' traverses over its sub-elements.
214214instance Plated Element where
215215 plate = nodes . traverse . _Element
216− {-# INLINE plate #-}
216+ {-# INLINE plate #-}