+−{-# LANGUAGE OverloadedStrings #-} +−module Consts where +− +−import qualified Data.ByteString.Char8 as B +− +−serverVersion :: B.ByteString +−serverVersion = "1"