Changeset 26731 for gs3-extensions/html-to-expeditee/trunk/src/perllib/cgiactions/HtmlToExpediteeAction.pm
- Timestamp:
- 2013-01-16T18:56:21+13:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs3-extensions/html-to-expeditee/trunk/src/perllib/cgiactions/HtmlToExpediteeAction.pm
r26597 r26731 50 50 { 51 51 "generate-frame" => { 'compulsory-args' => [ "fn", "json" ], 52 'optional-args' => ["assoc" ] },52 'optional-args' => ["assoc", "compute-font"] }, 53 53 }; 54 54 … … 80 80 81 81 my $assoc = $self->{'assoc'}; 82 82 83 my $compute_font = $self->{'compute-font'}; 84 print STDERR "Wil send compute_font... $compute_font\n\n"; 85 83 86 # no need to lock collection (??), the operation is read only 84 87 … … 95 98 my $expeditee_frame_io = new ExpediteeFrameIO($output_dir); 96 99 97 $expeditee_frame_io->buildFrame($exp_frame_tree );100 $expeditee_frame_io->buildFrame($exp_frame_tree,$compute_font); 98 101 99 102 if ($expeditee_frame_io->saveFrame("$fn.exp",$assoc)) {
Note:
See TracChangeset
for help on using the changeset viewer.