1 files changed, 3 insertions, 3 deletions
diff --git a/Alpha.hs b/Alpha.hs
index edaa130..6245614 100644
--- a/Alpha.hs
+++ b/Alpha.hs
@@ -79,10 +79,10 @@ where
 import qualified Data.Char as Char
 import qualified Data.List as List
 import Data.String
-import Data.Text (Text)
 import qualified Data.Text as Text
 import qualified Data.Text.Lazy as LazyText
 import Protolude as X hiding (list, ($), (&), (.), (>>=))
+import Protolude.Conv
 import qualified Prelude
 
 -- | Create a list. This should be @Data.List.singleton@ but that doesn't exist.
@@ -233,8 +233,8 @@ wrap lim = Text.words .> wrap_ 0 .> Text.unwords
       where
         lw = Text.length w
 
-str :: StringConv a b => a -> b
-str = toS
+str :: (StringConv a b) => a -> b
+str = Protolude.Conv.toS
 
 tshow :: Show a => a -> Text
 tshow = show