changeset 287:635da7cf43b6 misc

Fixes.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 09 Mar 2015 06:16:26 +0200
parents f749342539de
children e2f5b059e14d
files materials/parsematerial.pl
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/materials/parsematerial.pl	Mon Mar 09 06:09:52 2015 +0200
+++ b/materials/parsematerial.pl	Mon Mar 09 06:16:26 2015 +0200
@@ -375,10 +375,10 @@
 my %data = ();
 my $name = "";
 my $nline = 0;
-while (defined($line = <STDIN>))
+while (defined(my $line = <STDIN>))
 {
   $nline++;
-  chomp;
+  chomp($line);
   if ($line =~ /MATERIAL STATS \(([a-z ]+)\)\:/)
   {
     $name = $1;