From 70dfbdb6f06f227d0125090debf823b1486a5c61 Mon Sep 17 00:00:00 2001
From: Richard Fuchs <rfuchs@sipwise.com>
Date: Thu, 19 Jul 2012 11:16:19 +0000
Subject: [PATCH] for clarity, adapt the pack format as well

---
 lib/admin/Utils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/admin/Utils.pm b/lib/admin/Utils.pm
index 3addd7c..c938f40 100644
--- a/lib/admin/Utils.pm
+++ b/lib/admin/Utils.pm
@@ -584,7 +584,7 @@ sub generate_pcap {
         my($ts_sec, $ts_usec) = $pkg->{timestamp} =~ /^(\d+)\.(\d+)$/;
         my $len = length($pkg->{header}) + length($pkg->{payload}) + length($pkg->{trailer});
 
-        $pcap .= pack("LLLLa*a*a*a*",
+        $pcap .= pack("LLLLa*a*a*",
                 $ts_sec, $ts_usec,      # timestamp
                 $len, $len,             # bytes on-wire/off-wire
                 $pkg->{header},