From 14ecd9e42d1890fe033e590ff6857032b556ea39 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 27 Nov 2007 04:10:20 +0000 Subject: [PATCH] (pgg-parse-24, pgg-parse-crc24-string): Define for compiler. --- lisp/pgg-parse.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/pgg-parse.el b/lisp/pgg-parse.el index 11d0c652d34..336c492efde 100644 --- a/lisp/pgg-parse.el +++ b/lisp/pgg-parse.el @@ -178,6 +178,8 @@ (repeat)))) (repeat))))) + (defvar pgg-parse-crc24) + (defun pgg-parse-crc24-string (string) (let ((h (vector nil 183 1230 nil nil nil nil nil nil))) (ccl-execute-on-string pgg-parse-crc24 h string) @@ -463,6 +465,10 @@ pgg-parse-public-key-algorithm-alist))) result)) +;; p-d-p only calls this if it is defined, but the compiler does not +;; recognize that. +(declare-function pgg-parse-crc24-string "pgg-parse" (string)) + (defun pgg-decode-packets () (if (re-search-forward "^=\\([A-Za-z0-9+/]\\{4\\}\\)$" nil t) (let ((p (match-beginning 0)) -- 2.39.2