From b1d87c0c99e722912dc2ba69d0a1b5c8ba9b0af5 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Nov 2013 23:38:38 +0000
Subject: [PATCH] numbered-alias-sheet: bugfixes

---
 numbered-alias-sheet | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/numbered-alias-sheet b/numbered-alias-sheet
index 8bda11a..8c2758d 100755
--- a/numbered-alias-sheet
+++ b/numbered-alias-sheet
@@ -280,6 +280,9 @@ sub do_layout_recursive_search ($) {
     $eff_paper_size[$_] = $paperpts[$_] - 2.0*$borders[$_] foreach qw(0 1);
     @eff_paper_size = reverse @eff_paper_size if $lp_y{rotate_paper};
 
+    $eff_paper_size[0] >= $domain_metr[4] 
+	or return wontfit "domain suffix too long";
+
     @item_size = @core_size;
     my $blank_coord = !!$lp_y{'blank-below'};
     $item_size[$blank_coord] *= (1.0 + $blankratio);
-- 
2.30.2