nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

import: elpa: Fix typos in documentation strings 

* guix/import/elpa.scm: Fix typos in docstrings.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Konrad Hinsen 2018-03-16 14:55:10 +01:00 committed by Ludovic Courtès
parent 44dd3d579d
commit 07d2fed2f6
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix/import/elpa.scm
View File

@ -67,7 +67,7 @@ NAMES (strings)."
(string-append package-name-prefix (string-downcase name))))) (string-append package-name-prefix (string-downcase name)))))
(define* (elpa-url #:optional (repo 'gnu)) (define* (elpa-url #:optional (repo 'gnu))
"Retrun the URL of REPO." "Retrieve the URL of REPO."
(let ((elpa-archives (let ((elpa-archives
'((gnu . "https://elpa.gnu.org/packages") '((gnu . "https://elpa.gnu.org/packages")
(melpa-stable . "https://stable.melpa.org/packages") (melpa-stable . "https://stable.melpa.org/packages")
@ -75,7 +75,7 @@ NAMES (strings)."
(assq-ref elpa-archives repo))) (assq-ref elpa-archives repo)))
(define* (elpa-fetch-archive #:optional (repo 'gnu)) (define* (elpa-fetch-archive #:optional (repo 'gnu))
"Retrive the archive with the list of packages available from REPO." "Retrieve the archive with the list of packages available from REPO."
(let ((url (and=> (elpa-url repo) (let ((url (and=> (elpa-url repo)
(cut string-append <> "/archive-contents")))) (cut string-append <> "/archive-contents"))))
(if url (if url