summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--utils/cover/cover.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/utils/cover/cover.scm b/utils/cover/cover.scm
index 0cc573e..0ea1884 100644
--- a/utils/cover/cover.scm
+++ b/utils/cover/cover.scm
@@ -87,8 +87,10 @@
(page-width 176) ;mm
(margin 3) ;mm
- (isbn (if (equal? "" (get-string 'isbn metadata))
- "0000000000000"))
+ (isbn (let ((isbnstr (get-string 'isbn metadata)))
+ (if (equal? "" isbnstr)
+ "0000000000000"
+ (get-string 'isbn metadata))))
(book-title (get-string 'title metadata))
(book-subtitle (get-string 'subtitle metadata))
(book-title-before "") ; TODO: Thinking about removing this