oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Checkpoint

Browse source
This commit is contained in:
Brian Medley 2009-03-17 20:45:25 +00:00
parent 8761848ab3
commit 6acbdc063a
4 changed files with 77 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Storage.pm
View file

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