crop limits beyond available lines

Silence warnings about unitialized values.

diff --git a/barcat b/barcat
index b65271e303c9f826470605ecba636708564fb420..35ef3b3d314a7117f02f886aa717076671744868 100755 (executable)
--- a/barcat
+++ b/barcat
@@ -194,7 +194,7 @@ sub color {
 sub show_lines {
 
 state $nr =
-       $opt{hidemin} < 0 ? @lines + $opt{hidemin} + 1 :
+       $opt{hidemin} < 0 ? max(0, @lines + $opt{hidemin} + 1) :
        $opt{hidemin};
 @lines > $nr or return;
 
@@ -203,7 +203,7 @@ if (defined $opt{hidemax}) {
        if ($opt{hidemin} and $opt{hidemin} < 0) {
                $limit -= $opt{hidemax} - 1;
        }
-       else {
+       elsif ($opt{hidemax} <= $limit) {
                $limit = $opt{hidemax} - 1;
        }
 }

diff --git a/t/t1514-limit_beyond_end.in b/t/t1514-limit_beyond_end.in
new file mode 120000 (symlink)
index 0000000..02f1de9
--- /dev/null
+++ b/t/t1514-limit_beyond_end.in
@@ -0,0 +1 @@
+t1700-empty_input.in
\ No newline at end of file

diff --git a/t/t1514-limit_beyond_end_-L-5.out b/t/t1514-limit_beyond_end_-L-5.out
new file mode 100644 (file)
index 0000000..e69de29