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

Added some more skeletons (newWobject, newAsset, changelog(!))

Browse source
This commit is contained in:
Matthew Wilson 2005-12-12 17:29:37 +00:00
parent dc82b96d96
commit 0ca14186fe
5 changed files with 3 additions and 116 deletions
Download patch file Download diff file Expand all files Collapse all files

32
lib/WebGUI/Asset/Wobject/Poll.pm
View file

@ -242,38 +242,6 @@ sub getEditForm {
return $tabform;
}
#-------------------------------------------------------------------
sub getIndexerParams {
my $self = shift;
my $now = shift;
return {
Poll => {
sql => "select Poll.assetId,
Poll.question,
Poll.a1 as a1, Poll.a2 as a2, Poll.a3 as a3, Poll.a4 as a4, Poll.a5 as a5,
Poll.a6 as a6, Poll.a7 as a7, Poll.a8 as a8, Poll.a9 as a9, Poll.a10 as a10,
Poll.a11 as a11, Poll.a12 as a12, Poll.a13 as a13, Poll.a14 as a14, Poll.a15 as a15,
Poll.a16 as a16, Poll.a17 as a17, Poll.a18 as a18, Poll.a19 as a19, Poll.a20 as a20,
asset.ownerUserId as ownerId,
asset.url,
asset.groupIdView
from Poll, asset
where Poll.assetId = asset.assetId
and asset.startDate < $now
and asset.endDate > $now",
fieldsToIndex => ["question", "a1", "a2", "a3", "a4", "a5", "a6", "a7", "a8", "a9", "a10",
"a11", "a12", "a13", "a14", "a15", "a16", "a17", "a18", "a19", "a20"],
contentType => 'assetDetail',
url => 'WebGUI::URL::gateway($data{url})',
headerShortcut => 'select question from Poll where assetId = \'$data{assetId}\'',
bodyShortcut => 'select a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20
from Poll where assetId = \'$data{assetId}\'',
}
};
}
#-------------------------------------------------------------------
sub processPropertiesFromFormPost {
my $self = shift;