From 4d383f9e847f45d06a6d2b90beab7da30cdec7ba Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Sat, 6 Nov 1999 03:21:55 +0000
Subject: [PATCH] * pgg-parse.el (pgg-byte-after): Always pass the first
 argument of `char-after'.

---
 pgg-parse.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pgg-parse.el b/pgg-parse.el
index ef7dbf2..040ae1a 100644
--- a/pgg-parse.el
+++ b/pgg-parse.el
@@ -116,7 +116,7 @@
 	 0))
 
 (defmacro pgg-byte-after (&optional pos)
-  `(char-int (char-after ,pos)))
+  `(char-int (char-after ,(or pos `(point)))))
 
 (defmacro pgg-read-byte ()
   `(char-int (char-after (prog1 (point) (forward-char)))))
-- 
1.7.10.4