author | unc0rr |
Sun, 27 Nov 2011 14:46:57 +0300 | |
changeset 6450 | 14224c9b4594 |
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" |