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

Converted wobject to use more constructor properties and to get rid of the $name variable from all wobjects.

Browse source
This commit is contained in:
JT Smith 2003-03-02 22:13:53 +00:00
parent 5f6313579f
commit 589b975a3d
3 changed files with 77 additions and 48 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/WebGUI/Wobject/Article.pm
View file

@ -26,7 +26,6 @@ use WebGUI::Wobject;
our @ISA = qw(WebGUI::Wobject);
our $namespace = "Article";
our $name = WebGUI::International::get(1,$namespace);
#-------------------------------------------------------------------
@ -50,8 +49,13 @@ sub duplicate {
}
#-------------------------------------------------------------------
sub set {
$_[0]->SUPER::set($_[1],[qw(image templateId linkTitle linkURL attachment convertCarriageReturns allowDiscussion)]);
sub name {
return WebGUI::International::get(1,$namespace);
}
#-------------------------------------------------------------------
sub new {
$_[0]->SUPER::new($_[1],[qw(image templateId linkTitle linkURL attachment convertCarriageReturns allowDiscussion)],1);
}
#-------------------------------------------------------------------
@ -108,7 +112,6 @@ sub www_edit {
-value=>$_[0]->get("allowDiscussion"),
-uiLevel=>5
);
$f->raw($_[0]->SUPER::discussionProperties);
$output .= $_[0]->SUPER::www_edit($f->printRowsOnly);
return $output;
}