TagsWith getNameOfAuthor "posts/*" $ fromCapture "authors/*.html" . urlEncode

-- Вспомогательная функция, формирующая страницу с облаком определённых тегов.
createPageWithTagsCloud :: Tags 
                        -> Identifier
                        -> Double
                        -> Double
                        -> String 
                        -> String
                        -> Identifier
                        -> Rules (
buildPostsAuthors :: MonadMetadata m => m Tags
buildPostsAuthors = buildTagsWith getNameOfAuthor "posts/*" $ fromCapture "authors/*.html" . urlEncode
buildPostsAuthors = buildTagsWith getNameOfAuthor "posts/*" $ fromCapture "authors/*.html" . urlEncode