mirror of
https://github.com/commercialhaskell/stackage-server.git
synced 2026-01-12 12:18:29 +01:00
12 lines
210 B
Haskell
12 lines
210 B
Haskell
-- | A wrapper around the 'Slug' interface.
|
|
|
|
module Data.Tag where
|
|
|
|
import Control.Monad.Catch
|
|
import Data.Slug
|
|
import Data.Text
|
|
|
|
-- | Make a tag.
|
|
mkTag :: MonadThrow m => Text -> m Slug
|
|
mkTag = mkSlugLen 1 20
|