From 987ea4688b5091442ee9e43a2621cf55e7aac095 Mon Sep 17 00:00:00 2001
From: Bill Medland <medbi01@accpac.com>
Date: Thu, 12 Jul 2001 22:21:44 +0000
Subject: [PATCH] Get winemaker to drop the trailing CtrlZ that is still to be
 found on quite a lot of DOS files.

---
 tools/winemaker | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/tools/winemaker b/tools/winemaker
index 6eba7afffd3..523b18858f1 100755
--- a/tools/winemaker
+++ b/tools/winemaker
@@ -1307,6 +1307,11 @@ sub fix_file
   my $rc_textinclude_state=0;
   my @pack_stack;
   while (<FILEI>) {
+    # Remove any trailing CtrlZ, which isn't strictly in the file
+    if (/\x1A/) {
+      s/\x1A//;
+      last if (/^$/)
+    }
     $line++;
     s/\r\n$/\n/;
     if (!/\n$/) {