changeset 278:5e9f8b76d494 misc

Cleanup.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 08 Mar 2015 10:52:33 +0200
parents 40cfb180d576
children 269ecedff518
files materials/parsematerial.pl
diffstat 1 files changed, 3 insertions(+), 12 deletions(-) [+]
line wrap: on
line diff
--- a/materials/parsematerial.pl	Sun Mar 08 10:50:22 2015 +0200
+++ b/materials/parsematerial.pl	Sun Mar 08 10:52:33 2015 +0200
@@ -488,18 +488,9 @@
 sub get_datastr($$)
 {
   my ($name, $i) = @_;
-  if ($i == 1)
-  {
-    return $name;
-  }
-  elsif (ref($data{$name}{$i}) eq "ARRAY")
-  {
-     return join(", ", pta($data{$name}, $i));
-  }
-  else
-  {
-    return pt($data{$name}, $i);
-  }
+  return $name if ($i == 1);
+  return join(", ", pta($data{$name}, $i)) if (ref($data{$name}{$i}) eq "ARRAY");
+  return pt($data{$name}, $i);
 }