From ee5e4b34e435b280cc77afe0739c4f8e68345e56 Mon Sep 17 00:00:00 2001
From: jake <jake@jakes-mail.top>
Date: Sat, 16 Nov 2024 02:56:14 -0500
Subject: [PATCH] adjust number for opengpg format length_of_length

---
 keyserver      | 2 +-
 lib/KeyData.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/keyserver b/keyserver
index d0f93d6..aaf05f9 100755
--- a/keyserver
+++ b/keyserver
@@ -13,7 +13,7 @@ use KeyData;
 
 plugin Config => {file => $ARGV[1]};
 
-my $VERSION = "1.0.2";
+my $VERSION = "1.0.3";
 
 my $config = app->config(); # hypnotoad -f ./keyserver ./keyserver.conf
 my $start_time;
diff --git a/lib/KeyData.pm b/lib/KeyData.pm
index 1981f67..c76b400 100644
--- a/lib/KeyData.pm
+++ b/lib/KeyData.pm
@@ -119,7 +119,7 @@ class KeyData {
 				$length_field = ((($first_octet - 192) << 8) + ($second_octet) + 192); # probably fine
 			}
 			if ($first_octet == 255) {
-				$length_of_length = 5;
+				$length_of_length = 4;
 				#$subpacket_length = [4-octet scalar starting at 2nd_octet];
 				$length_field = (unpack('N', substr $data, 1, 4)); # idk
 				warn "Give me the key that caused this to be emited";