Changeset 519eaf5 for src/dgc

Timestamp:

03/30/14 23:59:06 (11 years ago)

Author:

Tomasz Obrebski <obrebski@…>

Branches:

master

Children:

0a58b3f

Parents:

f924e4b

git-author:

Tomasz Obrebski <obrebski@…> (03/30/14 23:59:06)

git-committer:

Tomasz Obrebski <obrebski@…> (03/30/14 23:59:06)

Message:

Bug fixes: bubbles,props

File:

• src/dgc/dgc (modified) (1 diff)

src/dgc/dgc

@@ -293 +293 @@
             my $hflagconstr = @{$x->{hflagconstr}} ? "//@{$x->{hflagconstr}}" : "";
             my $dflagconstr = @{$x->{dflagconstr}} ? "//@{$x->{dflagconstr}}" : "";
-            my $props = join(map { "\&$_" } $x->{props});
-            print_outin("LINK $head->{cat}$hflagconstr $dep->{cat}$dflagconstr $x->{role}$props",$x, @agrs, @govs);
+            my $props = join('',map("\&$_", @{$x->{props}}));
+
+            print_outin("LINK $head->{cat}$hflagconstr $dep->{cat}$dflagconstr $x->{role} $props",$x, @agrs, @govs);
         }
     }