summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
Diffstat (limited to 'guix')
-rw-r--r--guix/build/clojure-utils.scm2
-rw-r--r--guix/build/syscalls.scm2
2 files changed, 2 insertions, 2 deletions
diff --git a/guix/build/clojure-utils.scm b/guix/build/clojure-utils.scm
index 027777b4d1..9f7334bc8d 100644
--- a/guix/build/clojure-utils.scm
+++ b/guix/build/clojure-utils.scm
@@ -215,7 +215,7 @@ results from compiling LIB."
(define* (include-list\exclude-list include-list exclude-list
#:key all-list)
- "Given INCLUDE-LIST and EXCLUDE-LIST, replace all occurences of #:all by
+ "Given INCLUDE-LIST and EXCLUDE-LIST, replace all occurrences of #:all by
slicing ALL-LIST into them and compute their list difference."
(define (replace-#:all ls all-ls)
(append-map (match-lambda
diff --git a/guix/build/syscalls.scm b/guix/build/syscalls.scm
index 3316dc8dc5..749616ceb1 100644
--- a/guix/build/syscalls.scm
+++ b/guix/build/syscalls.scm
@@ -692,7 +692,7 @@ mounted at FILE."
(define* (device-in-use? device)
"Return #t if the block DEVICE is in use, #f otherwise. This is inspired
-from fdisk_device_is_used function of util-linux. This is particulary useful
+from fdisk_device_is_used function of util-linux. This is particularly useful
for devices that do not appear in /proc/self/mounts like overlayfs lowerdir
backend device."
(let*-values (((fd) (open-fdes device O_RDONLY))