The OverloadedStrings language extension allows the use of normal string literals to stand for Text values.
OverloadedStrings
Text
{-# LANGUAGE OverloadedStrings #-} import qualified Data.Text as T myText :: T.Text myText = "overloaded"