author | sheepluva |
Sat, 07 Jun 2014 16:23:12 +0200 | |
changeset 10258 | 4b7aa967f1e7 |
parent 10076 | b235e520ea21 |
child 10460 | 8dcea9087d75 |
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 |
10076 | 7 |
serverVersion = "3" |