From 86e28c9b3a6020ad5c9639d331ee34ee1ac17ee2 Mon Sep 17 00:00:00 2001
From: simon <simon@cda61777-01e9-0310-a592-d414129be87e>
Date: Wed, 9 Jul 2008 17:06:57 +0000
Subject: [PATCH] Just in case sbcsgen.pl is fed an sbcs.dat with the wrong
 line endings, remove \r from input lines.

git-svn-id: svn://svn.tartarus.org/sgt/charset@8113 cda61777-01e9-0310-a592-d414129be87e
---
 sbcsgen.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/sbcsgen.pl b/sbcsgen.pl
index 1907a1a..e2991b2 100644
--- a/sbcsgen.pl
+++ b/sbcsgen.pl
@@ -35,6 +35,7 @@ my @sortpriority = ();
 
 while (<FOO>) {
     chomp;
+    y/\r\n//; # robustness in the face of strange line endings
     if (/^charset (.*)$/) {
 	$charsetname = $1;
 	@vals = ();
-- 
2.11.0