(pgg-parse-24, pgg-parse-crc24-string): Define for compiler.
This commit is contained in:
parent
97d9baefc0
commit
14ecd9e42d
1 changed files with 6 additions and 0 deletions
|
|
@ -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))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue