From b93b5b612a8e5c0cd84ec844b1770f1c87c3b4ea Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Thu, 7 Jan 2010 01:24:02 +0000
Subject: [PATCH] Restore the byte-by-byte checksum method, since the
 Unicode-aware version breaks with very new 3M self-check units, according to
 dbs.

---
 Sip/Checksum.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 {
-- 
2.11.0