diff options
| -rw-r--r-- | utils/cover/cover.scm | 6 |
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 |