pk-crypto: Improve documentation of 'key-type'.

* guix/pk-crypto.scm (key-type): Improve docstring.
This commit is contained in:
Ludovic Courtès 2015-03-18 14:36:32 +01:00
parent 87bafa07ae
commit fc1ee09578
1 changed files with 2 additions and 2 deletions

View File

@ -251,8 +251,8 @@ must be a symbol: 'dsa, 'ecc, or 'rsa."
(bytevector->base16-string bv)))) (bytevector->base16-string bv))))
(define (key-type sexp) (define (key-type sexp)
"Return a symbol denoting the type of key representing by SEXP--e.g., 'rsa', "Return a symbol denoting the type of public or private key represented by
'ecc'--or #f if SEXP does not denote a valid key." SEXP--e.g., 'rsa', 'ecc'--or #f if SEXP does not denote a valid key."
(case (canonical-sexp-nth-data sexp 0) (case (canonical-sexp-nth-data sexp 0)
((public-key private-key) ((public-key private-key)
(canonical-sexp-nth-data (canonical-sexp-nth sexp 1) 0)) (canonical-sexp-nth-data (canonical-sexp-nth sexp 1) 0))