There. Push this back on to unc0rr. This effect can still desync, 'cause it always could, but at least now the two are linked w/o argument I think.
{-# LANGUAGE OverloadedStrings #-}
module Consts where
import qualified Data.ByteString.Char8 as B
serverVersion :: B.ByteString
serverVersion = "0"