Function: dig-rr-get-pkix-cert

dig-rr-get-pkix-cert is a byte-compiled function defined in dig.el.gz.

Signature

(dig-rr-get-pkix-cert RR)

Source Code

;; Defined in /usr/src/emacs/lisp/net/dig.el.gz
(defun dig-rr-get-pkix-cert (rr)
  (let (b e str)
    (string-match "[^\t ]+[\t ]+[0-9wWdDhHmMsS]+[\t ]+IN[\t ]+CERT[\t ]+\\(1\\|PKIX\\)[\t ]+[0-9]+[\t ]+[0-9]+[\t ]+(?" rr)
    (setq b (match-end 0))
    (string-match ")" rr)
    (setq e (match-beginning 0))
    (setq str (substring rr b e))
    (while (string-match "[\t \n\r]" str)
      (setq str (replace-match "" nil nil str)))
    str))