terminfo: probably fix a bug where 0xfeff should be ignored also?

diff --git a/extra/terminfo/terminfo.factor b/extra/terminfo/terminfo.factor
index 1c494d082f8be6593e2927184e5b7c5d82873863..3ba32d1f833050e439317704234178b04d82894f 100644 (file)
--- a/extra/terminfo/terminfo.factor
+++ b/extra/terminfo/terminfo.factor
@@ -36,7 +36,7 @@ C: <terminfo-header> terminfo-header
     boolean-bytes>> read [ 1 = ] { } map-as ;
 
 : read-shorts ( n -- seq' )
-    2 * read 2 <groups> [ le> dup 65535 = [ drop f ] when ] map ;
+    2 * read 2 <groups> [ le> dup 65534 >= [ drop f ] when ] map ;
 
 : align-even-bytes ( header -- )
     [ names-bytes>> ] [ boolean-bytes>> ] bi + odd?