Function: pgg-gpg-key-id-from-key-owner

pgg-gpg-key-id-from-key-owner is a byte-compiled function defined in pgg-gpg.el.gz.

Signature

(pgg-gpg-key-id-from-key-owner KEY-OWNER)

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/pgg-gpg.el.gz
(defun pgg-gpg-key-id-from-key-owner (key-owner)
  (cond ((not key-owner) nil)
	;; Extract bare key id from outermost paired angle brackets, if any:
	((string-match "[^<]*<\\(.+\\)>[^>]*" key-owner)
	 (substring key-owner (match-beginning 1)(match-end 1)))
	(key-owner)))