X-Git-Url: http://git.shiar.nl/barcat.git/blobdiff_plain/ae90555c01d3aa4495ce2c8e0c73e1eb1eaea77a..a052b8d20f25e69c82104135c9925c17dcaa3eb3:/graph

diff --git a/graph b/graph
index eaafb76..e76ec64 100755
--- a/graph
+++ b/graph
@@ -39,7 +39,7 @@ $SIG{INT} = 'IGNORE';  # continue after assumed eof
 
 my (@lines, @values);
 while (readline) {
-	chomp;
+	s/\r?\n\z//;
 	s/^\h*// unless $opt{unmodified};
 	push @values, s/^ ( \h* -? [0-9]* \.? [0-9]+ |)//x && $1;
 	if (defined $opt{trim}) {