Commit 14ecd9e4 authored by Glenn Morris's avatar Glenn Morris
Browse files

(pgg-parse-24, pgg-parse-crc24-string): Define for compiler.

parent 97d9baef
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment