chiark / gitweb /
numbered-alias-sheet: implement -g and -b
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:16:30 +0000 (21:16 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:16:30 +0000 (21:16 +0000)
numbered-alias-sheet

index fbbfa1f230f488342f7a73d7d69bc2ab9b73afb4..f0e1f337d8f29bfc984311661f0ef7cad4595dec 100755 (executable)
@@ -75,6 +75,10 @@ for (;;) {
            @borders = ($1,$1);
        } elsif (s/^-b($dbl_re)x($dbl_re)$//o) {
            @borders = ($1,$1);
+       } elsif (s/^-g($dbl_re)$//o) {
+           $gapratio = $1;
+       } elsif (s/^-b($dbl_re)$//o) {
+           $blankratio = $1;
        } elsif (s/^-D/-/) {
            open DEBUG, ">&STDERR" or die $!;
        } else {