From 9242340dede3859111e523ff07f1577bc99c2384 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Tue, 2 Nov 1999 18:19:21 +0000
Subject: [PATCH] (pgg-parse-length-type): Fix typo.
 (pgg-parse-public-key-encrypted-session-key-packet): Use
 `pgg-read-bytes-string' instead of `pgg-read-bytes'.

---
 pgg-parse.el |    5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/pgg-parse.el b/pgg-parse.el
index b8c82f7..71a1019 100644
--- a/pgg-parse.el
+++ b/pgg-parse.el
@@ -188,7 +188,7 @@
 			 (pgg-byte-after (+ 5 (point)))))
 	   5))
     (t;partial body length
-     '(0 0))))
+     '(0 . 0))))
 
 (defun pgg-parse-packet-header ()
   (let ((ptag (pgg-byte-after))
@@ -406,7 +406,8 @@
 		   'version (pgg-read-byte))
     (pgg-set-alist result
 		   'public-key-identifier
-		   (pgg-format-key-identifier (pgg-read-bytes 8)))
+		   (pgg-format-key-identifier 
+		    (pgg-read-bytes-string 8)))
     (pgg-set-alist result
 		   'public-key-algorithm
 		   (cdr (assq (pgg-read-byte)
-- 
1.7.10.4