package EditTemplateObject
@ISA = qw()

sub Name
return $ModuleName;

sub Explanation
return $ModuleExplanation;

sub new
my ($module) = @_;
#	$this->SUPER::new(
return $this;

sub DESTROY
my $this = shift;
	$this->SUPER::DESTROY(

sub GetParameterHash
my ($this, $App, $pParams) = @_;
return {};

sub IsOpen
my ($this, $App, $pParams, $IsPrint) = @_;
return 0;
return $App->HasPrivilege("EditTemplate", $IsPrint);

sub ShowMenu
my ($this, $App, $pParams, $ProgramPath, $BaseOption) = @_;
return 0;
return 0 if(defined $App->{pAdminOption});
return 0 if(!$this->IsOpen($App, $pParams, 0));

sub UpdatePage
my ($this, $App, $pParams) = @_;
return if(!$this->IsOpen($App, $pParams));

sub EditPage
my ($this, $App, $pParams) = @_;
return if(!$this->IsOpen($App, $pParams));

sub ViewPage
my ($this, $App, $pParams) = @_;
return if(!$this->IsOpen($App, $pParams));
return $this->{TkWiki}->ViewPage($App, $pParams);

sub CreatePage
my ($this, $App, $pParams) = @_;
return if(!$this->IsOpen($App, $pParams));

sub ShowPage
my ($this, $App, $pParams) = @_;

sub ShowFilesPage
my ($this, $App, $pParams) = @_;
return if(!$this->IsOpen($App, $pParams));
return $this->{TkWiki}->ShowFilesPage($App, $pParams);

sub UpdateFile
my ($this, $App, $pParams, $Privilege, $IsPrint) = @_;
return;

sub EditFile
my ($this, $App, $pParams, $Privilege, $IsPrint) = @_;
return;
return;