X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.web-live.git;a=blobdiff_plain;f=yarrg%2FCommods.pm;h=bce9a8e13b2cb33afd05feb7ada3d2410aa5ea02;hp=af03a6497b9a7760be5b55cbee867680ffd2d25a;hb=5b0690cc2d23aa69180aea98397d4ad44b528559;hpb=57664b818861ce04c4237d8f69af3bd47e815090

diff --git a/yarrg/Commods.pm b/yarrg/Commods.pm
index af03a64..bce9a8e 100644
--- a/yarrg/Commods.pm
+++ b/yarrg/Commods.pm
@@ -222,7 +222,7 @@ sub parse_info1 ($$$) {
 		    $ordval= $1;
 		    $ordval =~ s/^(\d+)\+$/ $1 + $lnoix * 10 /e;
 		} elsif ($prop =~ m/^\!([a-z]+)$/) {
-		    $c->{Flags} .= $prop;
+		    $c->{Flags} .= $1;
 		} else {
 		    die "unknown property $prop for $ucname";
 		}