| author | sheepluva |
| Thu, 12 Jun 2014 14:42:48 +0200 | |
| changeset 10285 | 03b615d3c6e1 |
| 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" |