diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm index 6e5c6aa..f05e035 100644 --- a/gnu/build/file-systems.scm +++ b/gnu/build/file-systems.scm @@ -294,15 +294,11 @@ partition field reader that returned a value." (define %partition-label-readers (list (partition-field-reader read-ext2-superblock - ext2-superblock-volume-name) - (partition-field-reader read-btrfs-superblock - btrfs-superblock-volume-name))) + ext2-superblock-volume-name))) (define %partition-uuid-readers (list (partition-field-reader read-ext2-superblock - ext2-superblock-uuid) - (partition-field-reader read-btrfs-superblock - btrfs-superblock-uuid))) + ext2-superblock-uuid))) (define read-partition-label (cut read-partition-field <> %partition-label-readers))