Mercurial > emacs
comparison lisp/net/tls.el @ 76125:428a3ee993db
(tls-certtool-program): Fix custom type.
author | John Paul Wallington <jpw@pobox.com> |
---|---|
date | Sat, 24 Feb 2007 18:05:45 +0000 |
parents | e3694f1cb928 |
children | dc6ada4b3839 dd7c098af727 |
comparison
equal
deleted
inserted
replaced
76124:abc2a68a039d | 76125:428a3ee993db |
---|---|
84 | 84 |
85 (defcustom tls-certtool-program (executable-find "certtool") | 85 (defcustom tls-certtool-program (executable-find "certtool") |
86 "Name of GnuTLS certtool. | 86 "Name of GnuTLS certtool. |
87 Used by `tls-certificate-information'." | 87 Used by `tls-certificate-information'." |
88 :version "22.1" | 88 :version "22.1" |
89 :type '(repeat string) | 89 :type 'string |
90 :group 'tls) | 90 :group 'tls) |
91 | 91 |
92 (defun tls-certificate-information (der) | 92 (defun tls-certificate-information (der) |
93 "Parse X.509 certificate in DER format into an assoc list." | 93 "Parse X.509 certificate in DER format into an assoc list." |
94 (let ((certificate (concat "-----BEGIN CERTIFICATE-----\n" | 94 (let ((certificate (concat "-----BEGIN CERTIFICATE-----\n" |