diff --git a/Propellor/Message.hs b/Propellor/Message.hs
index f4c812d..7f45194 100644
--- a/Propellor/Message.hs
+++ b/Propellor/Message.hs
@@ -19,6 +19,7 @@ actionMessage desc a = do
 	setSGR [SetColor Foreground intensity color]
 	putStrLn msg
 	setSGR []
+	setTitle "Propellor running"
 	hFlush stdout
 
 	return r