--- deliantra/server/lib/cf.pm 2007/07/24 04:55:34 1.318 +++ deliantra/server/lib/cf.pm 2007/07/24 22:49:40 1.320 @@ -2520,7 +2520,7 @@ # send meta info to client, if not yet sent unless (exists $self->{channel}{$channel->{id}}) { $self->{channel}{$channel->{id}} = $channel; - $self->ext_msg (channel_info => %$channel); + $self->ext_msg (channel_info => $channel); } $channel = $channel->{id}; @@ -2867,10 +2867,15 @@ my $res = $facedata->{resource}; my $enc = JSON::XS->new->utf8->canonical; + if (my $soundconf = delete $res->{"res/sound.conf"}) { + $soundconf = $enc->decode (delete $soundconf->{data}); + # todo + } + while (my ($name, $info) = each %$res) { my $meta = $enc->encode ({ - name => $name, - copyright => $info->{copyright}, #TODO# + name => $name, + %{ $info->{meta} || {} }, }); my $idx = (cf::face::find $name) || cf::face::alloc $name;