Use a slightly smaller label

snapframework · Mar 14, 2014 · ff9e082 · ff9e082
1 parent ca65613
commit ff9e082
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Snap/Internal/Http/Server/SimpleBackend.hs b/src/Snap/Internal/Http/Server/SimpleBackend.hs
@@ -123,7 +123,7 @@ acceptThread defaultTimeout handler tmgr elog cpu sock exitMVar =
         setSocketOption s NoDelay 1
         debug $ "acceptThread: accepted connection from remote: " ++ show addr
         let label = S.concat
-                    [ "snap-server: connection from remote: "
+                    [ "snap-server: connection from: "
                     , SC.pack (show addr)
                     , " on socket: "
                     , SC.pack (show (fdSocket s))