M guix/build/git.scm => guix/build/git.scm +1 -1
@@ 133,7 133,7 @@ SWH."
(when (file-exists?
(string-append directory "/.gitattributes"))
;; Perform CR/LF conversion and other changes
- ;; specificied by '.gitattributes'.
+ ;; specified by '.gitattributes'.
(invoke git-command "-C" directory "init")
(invoke git-command "-C" directory "config" "--local"
"user.email" "you@example.org")
M guix/import/cabal.scm => guix/import/cabal.scm +1 -1
@@ 867,7 867,7 @@ the ordering operation and the version."
((("import" imports) rest ...)
(eval (append (append-map
;; The imports are (at least sometimes) a list with one string
- ;; containing all the names separeted by commas. This splits
+ ;; containing all the names separated by commas. This splits
;; those strings to a list of strings in the same format that is
;; used in common-stanzas.
(cut assoc-ref common-stanzas <>)
M guix/import/crate.scm => guix/import/crate.scm +1 -1
@@ 363,7 363,7 @@ look up the development dependencs for the given crate."
(crate-versions crate))))))
;; If no non-yanked existing package version was found, check the upstream
- ;; versions. If a non-yanked upsteam version exists, use it instead,
+ ;; versions. If a non-yanked upstream version exists, use it instead,
;; otherwise use the existing package version, provided it exists.
(define (dependency-name+missing+version+yanked dep)
(let* ((name (crate-dependency-id dep))
M guix/import/elpa.scm => guix/import/elpa.scm +1 -1
@@ 123,7 123,7 @@ defined by ELPA-PKG-SPEC, a package specification as in an archive
(eq? (first elpa-pkg-spec) (string->symbol name)))
(define* (elpa-package-info name #:optional (repo 'gnu))
- "Extract the information about the package NAME from the package archieve of
+ "Extract the information about the package NAME from the package archive of
REPO."
(let* ((archive (elpa-fetch-archive repo))
(pkgs (match archive ((version pkg-spec ...) pkg-spec)))
M guix/import/gnome.scm => guix/import/gnome.scm +1 -1
@@ 72,7 72,7 @@ version."
"Predicate to check if VERSION matches the format of a GNOME release
version. A release version can have more than one form, depending on the
GNOME component, but typically it takes the form of a major-minor tuple, where
-minor can also be prefixed wih \"alpha\", \"beta\" or \"rc\". For more
+minor can also be prefixed with \"alpha\", \"beta\" or \"rc\". For more
information about the GNOME versioning scheme, see:
https://discourse.gnome.org/t/new-gnome-versioning-scheme/4235"
(define components (string-tokenize version %not-dot))
M guix/import/go.scm => guix/import/go.scm +3 -3
@@ 91,7 91,7 @@
;;; + or recognizing .vcs suffix
;;; + or parsing meta tag in HTML served at the URL
;;; + or (TODO) if nothing else works by using zip file served by GOPROXY
-;;; - get go.mod from GOPROXY (which is able to synthetize one if needed)
+;;; - get go.mod from GOPROXY (which is able to synthesize one if needed)
;;; - extract list of dependencies from this go.mod
;;;
;;; The Go module paths are translated to a Guix package name under the
@@ 131,7 131,7 @@ https://godoc.org/golang.org/x/mod/module#hdr-Escaped_Paths)."
(http-fetch* (string-append "https://pkg.go.dev/" name)))
(define* (go-module-version-info goproxy name #:key version)
- "Fetch a JSON object encoding about the lastest version for NAME from the given
+ "Fetch a JSON object encoding about the latest version for NAME from the given
GOPROXY server, or for VERSION when specified."
(let ((file (if version
(string-append "@v/" version ".info")
@@ 150,7 150,7 @@ styles for the same package."
(begin
(warning (G_ "Empty list of versions on proxy ~a for package '~a'. Using latest.~%")
goproxy name)
- ;; If we haven't recieved any versions, look in the version-info json
+ ;; If we haven't received any versions, look in the version-info json
;; object and return a one-element list if found.
(or (and=> (assoc-ref (go-module-version-info goproxy name) "Version")
list)
M guix/import/hexpm.scm => guix/import/hexpm.scm +2 -2
@@ 95,7 95,7 @@
(define (lookup-hexpm name)
- "Look up NAME on hex.pm and return the corresopnding <hexpm> record
+ "Look up NAME on hex.pm and return the corresponding <hexpm> record
or #f if it was not found."
(and=> (json-fetch (package-url name))
json->hexpm))
@@ 143,7 143,7 @@ or #f if it was not found."
(define (lookup-hexpm-release version*)
- "Look up RELEASE on hexpm-version-url and return the corresopnding
+ "Look up RELEASE on hexpm-version-url and return the corresponding
<hexpm-release> record or #f if it was not found."
(and=> (json-fetch (hexpm-version-url version*))
json->hexpm-release))
M guix/packages.scm => guix/packages.scm +1 -1
@@ 394,7 394,7 @@ name of its URI."
;; Work around limitations in the 'snippet' mechanism. It is not possible for
;; a 'snippet' to produce a tarball with a different base name than the
-;; original downloaded source. Moreover, cherry picking dozens of upsteam
+;; original downloaded source. Moreover, cherry picking dozens of upstream
;; patches and applying them suddenly is often impractical; especially when a
;; comprehensive code reformatting is done upstream. Mainly designed for
;; Linux and IceCat packages.
M guix/scripts/system/installer.scm => guix/scripts/system/installer.scm +1 -1
@@ 46,7 46,7 @@
(define (show-help)
(display (G_ "Usage: guix system installer [OPTION]...
-Run the system installler.\n"))
+Run the system installer.\n"))
(display (G_ "
-n, --dry-run skip network setup, partitioning, and actual install"))
(display (G_ "
M guix/utils.scm => guix/utils.scm +1 -1
@@ 1200,7 1200,7 @@ be determined."
(define (string-distance s1 s2)
"Compute the Levenshtein distance between two strings."
- ;; Naive implemenation
+ ;; Naive implementation
(define loop
(mlambda (as bt)
(match as