diff --git a/app/pinentry-rofi.hs b/app/pinentry-rofi.hs
index ea54fff..0c1ad81 100644
--- a/app/pinentry-rofi.hs
+++ b/app/pinentry-rofi.hs
@@ -20,7 +20,9 @@ import UnliftIO.Environment
 main :: IO ()
 main = runSimpleApp $ do
   hSetBuffering stdout LineBuffering
-  logInfo "OK Pleased to meet you"
+  -- NOTE: can't use RIO logging here since that will do to stderr and not
+  -- stdout
+  putStrLnT "OK Pleased to meet you"
   pinentryLoop =<< readPinConf
 
 newtype PinConf = PinConf {pcBwName :: T.Text} deriving (Eq, Show)