checkpoint

This commit is contained in:
Brian Medley 2009-03-03 14:56:55 +00:00
parent 00cbaa49af
commit c7db6abab0

View file

@ -1197,11 +1197,16 @@ sub annotate {
if ($imageAsset->{annotations} =~ /\n/) { if ($imageAsset->{annotations} =~ /\n/) {
$imageAsset->{annotations} .= "\n"; $imageAsset->{annotations} .= "\n";
} }
warn("there");
$imageAsset->{annotations} .= "top: ${annotate_top}px; left: ${annotate_left}px;\nwidth: ${annotate_width}px; height: ${annotate_height}px;\n$annotate_text"; $imageAsset->{annotations} .= "top: ${annotate_top}px; left: ${annotate_left}px;\nwidth: ${annotate_width}px; height: ${annotate_height}px;\n$annotate_text";
$self->{_data}{annotations} = $self->{_data}; warn("there: $imageAsset->{annotations}");
$self->{_data}{annotations} = $imageAsset->{annotations};
warn("there: $self->{_data}{annotations}");
$self->session->db->setRow("ImageAsset","assetId",$self->{_data}); $self->session->db->setRow("ImageAsset","assetId",$self->{_data});
foreach my $k (sort keys %{ $self->{_data} }) {
warn("$k => $$self{_data}{$k}");
}
return 1; return 1;
} }