Paste server written in Haskell. Fork of Hpaste, fully freedom and privacy respecting and generally improved. At the time of writing there's an instance at <http://paste.rel4tion.org>.

[[ 🗃 ^aoqmo toothpaste ]] :: [📥 Inbox] [📤 Outbox] [🐤 Followers] [🤝 Collaborators] [🛠 Commits]

Clone

HTTPS: git clone https://vervis.peers.community/repos/aoqmo

SSH: git clone USERNAME@vervis.peers.community:aoqmo

Branches

Tags

hpaste :: src / Data / Text /

ToText.hs

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

module Data.Text.ToText where

import Data.Text
import qualified Data.Text.Lazy as L
import Data.ByteString
import Data.Text.Encoding
import qualified Data.ByteString.Lazy as L

class ToText a where
  toText :: a -> Text
  toLazyText :: a -> L.Text
  toLazyText = L.fromStrict . toText

instance ToText ByteString where
  toText = decodeUtf8
[See repo JSON]