From: hpa <hpa>
Date: Wed, 28 Mar 2001 21:48:30 +0000 (+0000)
Subject: Ignore carriage return characters -- same behaviour as syslinux
X-Git-Tag: syslinux-1.54~2
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=3255473d905d98e3ca9e0ea96c248ae8d5372bde;p=platform%2Fupstream%2Fsyslinux.git

Ignore carriage return characters -- same behaviour as syslinux
---

diff --git a/sys2ansi.pl b/sys2ansi.pl
index bd7fd5a..d4b47db 100755
--- a/sys2ansi.pl
+++ b/sys2ansi.pl
@@ -2,6 +2,7 @@
 # $Id$
 #
 # Perl script to convert a Syslinux-format screen to PC-ANSI
+# to display in a color xterm or on the Linux console
 #
 @ansicol = (0,4,2,6,1,5,3,7);
 
@@ -25,8 +26,9 @@ while ( read(STDIN, $ch, 1) > 0 ) {
 	    printf "%d;%dm",
 	    $ansicol[$attr >> 4] + 40, $ansicol[$attr & 7] + 30;
 	}
+    } elsif ( $ch eq "\x0D" ) {	# <CR>  <Ctrl-M> Carriage return
+	# Ignore
     } else {
 	print $ch;
     }
 }
-