From: djfiander <djfiander>
Date: Thu, 7 Jan 2010 01:24:02 +0000 (+0000)
Subject: Restore the byte-by-byte checksum method, since the Unicode-aware
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=b93b5b612a8e5c0cd84ec844b1770f1c87c3b4ea;p=working%2FSIPServer.git

Restore the byte-by-byte checksum method, since the Unicode-aware
version breaks with very new 3M self-check units, according to dbs.
---

diff --git a/Sip/Checksum.pm b/Sip/Checksum.pm
index 49ea78b..5840d38 100644
--- a/Sip/Checksum.pm
+++ b/Sip/Checksum.pm
@@ -29,7 +29,7 @@ our @EXPORT_OK = qw(checksum verify_cksum);
 sub checksum {
     my $pkt = shift;
 
-    return (-unpack('%16U*', $pkt) & 0xFFFF);
+    return (-unpack('%16C*', $pkt) & 0xFFFF);
 }
 
 sub verify_cksum {