X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/ec95f39fbe75c414e53f5f922b75390a0179e916..73b9542320e82ad398689b66bc1938c78cc53be0:/src/msg.sml diff --git a/src/msg.sml b/src/msg.sml index a745f5c..ab79885 100644 --- a/src/msg.sml +++ b/src/msg.sml @@ -238,6 +238,7 @@ fun send (bio, m) = OpenSSL.writeString (bio, s)) | MsgReUsers => OpenSSL.writeInt (bio, 41) | MsgVmailChanged => OpenSSL.writeInt (bio, 42) + | MsgFirewallRegen => OpenSSL.writeInt (bio, 43) fun checkIt v = case v of @@ -352,6 +353,7 @@ fun recv bio = | 40 => Option.map MsgDescription (OpenSSL.readString bio) | 41 => SOME MsgReUsers | 42 => SOME MsgVmailChanged + | 43 => SOME MsgFirewallRegen | _ => NONE) end