summaryrefslogtreecommitdiffstats
path: root/pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm
diff options
context:
space:
mode:
authoralee <alee@c9f7a03b-bd48-0410-a16d-cbbf54688b0b>2009-05-21 01:43:37 +0000
committeralee <alee@c9f7a03b-bd48-0410-a16d-cbbf54688b0b>2009-05-21 01:43:37 +0000
commitf35d2c17af63f124f57f47b8968ab840d07a501f (patch)
tree0c4f27df78e546aeb08a8fe32aab51a707950ca8 /pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm
parentc8de1e88d4b834c697e8c12cfae2000f784e5678 (diff)
downloadpki-f35d2c17af63f124f57f47b8968ab840d07a501f.tar.gz
pki-f35d2c17af63f124f57f47b8968ab840d07a501f.tar.xz
pki-f35d2c17af63f124f57f47b8968ab840d07a501f.zip
Bugzilla Bug #497583 - web wizard tps - menu highlight and label typo
git-svn-id: svn+ssh://svn.fedorahosted.org/svn/pki/trunk@484 c9f7a03b-bd48-0410-a16d-cbbf54688b0b
Diffstat (limited to 'pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm')
-rwxr-xr-xpki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm b/pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm
index a7f46dbd9..c422a8bcc 100755
--- a/pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm
+++ b/pki/base/tps/lib/perl/PKI/TPS/SecurityDomainPanel.pm
@@ -41,7 +41,7 @@ sub new {
$self->{"isSubPanel"} = \&is_sub_panel;
$self->{"hasSubPanel"} = \&has_sub_panel;
- $self->{"isPanelDone"} = \&PKI::TPS::Common::no;
+ $self->{"isPanelDone"} = \&is_panel_done;
$self->{"getPanelNo"} = &PKI::TPS::Common::r(1);
$self->{"getName"} = &PKI::TPS::Common::r("Security Domain");
$self->{"vmfile"} = "securitydomainpanel.vm";
@@ -188,9 +188,15 @@ sub update
$::config->put("securitydomain.select", "existing");
$::config->put("securitydomain.host", $sdomainURL_info->host);
$::config->put("securitydomain.httpsadminport", $sdomainURL_info->port);
+ $::config->put("preop.securitydomain.done", "true");
$::config->commit();
return 1;
}
+sub is_panel_done
+{
+ return $::config->get("preop.securitydomain.done");
+}
+
1;