@@ -66,9 +66,6 @@ deleteExampleIndex = deleteIndex testIndex
67data ServerVersion = ServerVersion Int Int Int deriving (Show, Eq, Ord)
67data ServerVersion = ServerVersion Int Int Int deriving (Show, Eq, Ord)
70−es14 = ServerVersion 1 4 0
72es13 :: ServerVersion
69es13 :: ServerVersion
73es13 = ServerVersion 1 3 0
70es13 = ServerVersion 1 3 0
@@ -78,9 +75,6 @@ es12 = ServerVersion 1 2 0
78es11 :: ServerVersion
75es11 :: ServerVersion
79es11 = ServerVersion 1 1 0
76es11 = ServerVersion 1 1 0
82−es10 = ServerVersion 1 0 0
84serverBranch :: ServerVersion -> ServerVersion
78serverBranch :: ServerVersion -> ServerVersion
85serverBranch (ServerVersion majorVer minorVer patchVer) =
79serverBranch (ServerVersion majorVer minorVer patchVer) =
86 ServerVersion majorVer minorVer patchVer
80 ServerVersion majorVer minorVer patchVer