Changeset 26596 for gs3-extensions/html-to-expeditee/trunk/src/perllib/cgiactions/HtmlToExpediteeAction.pm
- Timestamp:
- 2013-01-08T14:13:09+13:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs3-extensions/html-to-expeditee/trunk/src/perllib/cgiactions/HtmlToExpediteeAction.pm
r24938 r26596 50 50 { 51 51 "generate-frame" => { 'compulsory-args' => [ "fn", "json" ], 52 'optional-args' => [ ] },52 'optional-args' => ["assoc"] }, 53 53 }; 54 54 … … 78 78 79 79 my $fn = $self->{'fn'}; 80 81 my $assoc = $self->{'assoc'}; 80 82 81 83 # no need to lock collection (??), the operation is read only … … 95 97 $expeditee_frame_io->buildFrame($exp_frame_tree); 96 98 97 if ($expeditee_frame_io->saveFrame("$fn.exp" )) {99 if ($expeditee_frame_io->saveFrame("$fn.exp",$assoc)) { 98 100 99 101 # write out next free frame num
Note:
See TracChangeset
for help on using the changeset viewer.