diff options
Diffstat (limited to 'guix')
-rw-r--r-- | guix/build/clojure-utils.scm | 2 | ||||
-rw-r--r-- | guix/build/syscalls.scm | 2 |
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)) |