From fc1ee095789641cdfe67c65ca8988ef34d921288 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 18 Mar 2015 14:36:32 +0100 Subject: pk-crypto: Improve documentation of 'key-type'. * guix/pk-crypto.scm (key-type): Improve docstring. --- guix/pk-crypto.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/guix/pk-crypto.scm b/guix/pk-crypto.scm index 7306b66922..f90c2e61d5 100644 --- a/guix/pk-crypto.scm +++ b/guix/pk-crypto.scm @@ -251,8 +251,8 @@ must be a symbol: 'dsa, 'ecc, or 'rsa." (bytevector->base16-string bv)))) (define (key-type sexp) - "Return a symbol denoting the type of key representing by SEXP--e.g., 'rsa', -'ecc'--or #f if SEXP does not denote a valid key." + "Return a symbol denoting the type of public or private key represented by +SEXP--e.g., 'rsa', 'ecc'--or #f if SEXP does not denote a valid key." (case (canonical-sexp-nth-data sexp 0) ((public-key private-key) (canonical-sexp-nth-data (canonical-sexp-nth sexp 1) 0)) -- cgit v1.2.3