| author | Vittorio Giovara <vittorio.giovara@gmail.com> |
| Fri, 17 Jan 2014 06:58:28 -0800 | |
| changeset 10002 | 29acde6f200c |
| parent 9702 | 27006953d901 |
| child 10076 | b235e520ea21 |
| 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 |
| 9702 | 7 |
serverVersion = "2" |