diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-03-18 14:36:32 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-03-18 14:43:03 +0100 |
| commit | fc1ee095789641cdfe67c65ca8988ef34d921288 (patch) | |
| tree | 495108930f286ad035f8f511b1033864823989ba | |
| parent | 87bafa07ae68084819bb2648bd1042c354d11317 (diff) | |
| download | gnu-guix-fc1ee095789641cdfe67c65ca8988ef34d921288.tar gnu-guix-fc1ee095789641cdfe67c65ca8988ef34d921288.tar.gz | |
pk-crypto: Improve documentation of 'key-type'.
* guix/pk-crypto.scm (key-type): Improve docstring.
| -rw-r--r-- | guix/pk-crypto.scm | 4 |
1 files 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)) |