Checksum calc needs to include the 'AZ' portion

Signed-off-by: Dan Scott <dscott@laurentian.ca>
Signed-off-by: Jason Stephenson <jstephenson@mvlc.org>

diff --git a/Sip.pm b/Sip.pm
index 0922e84..37b3814 100644 (file)
--- a/Sip.pm
+++ b/Sip.pm
@@ -230,7 +230,7 @@ sub write_msg {
         if (defined($self->{seqno})) {
             $msg .= 'AY' . $self->{seqno};
         }
-        $msg .= 'AZ' . checksum($msg);
+        $msg .= checksum($msg . 'AZ');
     }