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

Added Export Page functionality

Browse source
This commit is contained in:
Len Kranendonk 2004-08-06 12:57:24 +00:00
parent b662855cff
commit b6d8797a5d
13 changed files with 616 additions and 48 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Page.pm
View file

@ -462,6 +462,7 @@ sub generate {
.moveUpIcon('op=movePageUp')
.moveDownIcon('op=movePageDown')
.cutIcon('op=cutPage');
$var{'page.controls'} .= exportIcon('op=exportPage') if defined ($session{config}{exportPath});
my $sth = WebGUI::SQL->read("select * from wobject where pageId=".$session{page}{pageId}." order by sequenceNumber, wobjectId",WebGUI::SQL->getSlave);
while (my $wobject = $sth->hashRef) {
my $wobjectToolbar = wobjectIcon()
@ -1368,8 +1369,10 @@ Returns an array of hashrefs containing the page properties of this node and it'
sub self_and_descendants {
my ($self);
$self = shift;
my @options = @_;
return @{$self->get_self_and_children_flat(
id => $self->get('pageId')
id => $self->get('pageId'),
@options
)};
}