author | koda |
Sat, 24 Sep 2011 21:54:11 +0200 | |
changeset 6017 | 24631fd2fb9e |
parent 4973 | 53411a26df7e |
child 6737 | ce5fbd98370f |
permissions | -rw-r--r-- |
4973
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
1 |
{-# LANGUAGE OverloadedStrings #-} |
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
2 |
module Consts where |
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
3 |
|
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
4 |
import qualified Data.ByteString.Char8 as B |
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
5 |
|
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
6 |
serverVersion :: B.ByteString |
53411a26df7e
Add server version (which is separate from protocol version) and a check in frontend for a new enough server (currently only qWarning)
unc0rr
parents:
diff
changeset
|
7 |
serverVersion = "0" |