From 1dd7b87f101ce99b37be5c769904c1aa2f6a0615 Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <othacehe@gnu.org>
Date: Tue, 26 May 2020 13:05:22 +0200
Subject: image: Set offset default to zero.
* gnu/image.scm (<partition>)[offset]: Set to zero by default.
* gnu/system/image.scm (system-disk-image): Adapt accordingly.
---
gnu/image.scm | 2 +-
gnu/system/image.scm | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
(limited to 'gnu')
diff --git a/gnu/image.scm b/gnu/image.scm
index 3a02692950..b434ed50e3 100644
--- a/gnu/image.scm
+++ b/gnu/image.scm
@@ -48,7 +48,7 @@
partition?
(device partition-device (default #f))
(size partition-size)
- (offset partition-offset (default #f))
+ (offset partition-offset (default 0))
(file-system partition-file-system (default "ext4"))
(label partition-label (default #f))
(uuid partition-uuid (default #f))
diff --git a/gnu/system/image.scm b/gnu/system/image.scm
index 6b5a36ffc6..cb770a17e8 100644
--- a/gnu/system/image.scm
+++ b/gnu/system/image.scm
@@ -253,7 +253,7 @@ used in the image."
#$label
#$dos-type
#$image
- #$(or offset 0))))
+ #$offset)))
(let* ((format (image-format image))
(image-type (format->image-type format))
--
cgit v1.2.3