From ee3dcfe98fdc32918e3476f437b9603983d6d0be Mon Sep 17 00:00:00 2001
From: Xin LI <delphij@FreeBSD.org>
Date: Mon, 20 Nov 2017 06:53:49 +0000
Subject: Vendor import of less v529.

---
 mkutable | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'mkutable')

diff --git a/mkutable b/mkutable
index ff107b51f007..276062876bc9 100755
--- a/mkutable
+++ b/mkutable
@@ -11,6 +11,16 @@ use vars qw( $opt_f $opt_n );
 use Getopt::Std;
 my $type_field = 2;
 
+# Override Unicode tables for certain control chars
+# that are expected to be found in normal text files.
+my %force_space = (
+    0x08 => 1, # backspace
+    0x09 => 1, # tab
+    0x0a => 1, # newline
+    0x0c => 1, # form feed
+    0x0d => 1, # carriage return
+);
+
 exit (main() ? 0 : 1);
 
 sub main {
@@ -47,6 +57,7 @@ sub main {
         my $type = $fields[$type_field];
         $type =~ s/\s//g;
         for ($last_code = $lo_code; $last_code <= $hi_code; ++$last_code) {
+            $type = 'Zs' if $force_space{$last_code};
             output(\%out, $last_code, $type);
         }
     }
-- 
cgit v1.3