diff --git a/Propellor/SimpleSh.hs b/Propellor/SimpleSh.hs
index 741c1bc..0999be9 100644
--- a/Propellor/SimpleSh.hs
+++ b/Propellor/SimpleSh.hs
@@ -57,7 +57,7 @@ simpleSh namedpipe = do
 			=<< catchMaybeIO (writeChan chan . t =<< hGetLine from)
 		void $ concurrently
 			(mkreader StdoutLine outh)
-			(mkreader StderrLine outh)
+			(mkreader StderrLine errh)
 
 		writeChan chan . Done =<< waitForProcess pid