diff options
author | Guilhem Moulin <guilhem.moulin@fripost.org> | 2013-01-20 03:04:17 +0100 |
---|---|---|
committer | Guilhem Moulin <guilhem.moulin@fripost.org> | 2013-01-20 03:04:17 +0100 |
commit | 35c4ad13a52bdcaab251358e4b7df99dd852c76d (patch) | |
tree | 8fcafeae85ae97332a6a5e9d0ff2abcd178e537b /lib/Fripost/Panel/Login.pm | |
parent | f7701a60f217ab154fe53a5d13bbd223f6182150 (diff) |
New domains.
Diffstat (limited to 'lib/Fripost/Panel/Login.pm')
-rw-r--r-- | lib/Fripost/Panel/Login.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lib/Fripost/Panel/Login.pm b/lib/Fripost/Panel/Login.pm index 12b0294..b0906b3 100644 --- a/lib/Fripost/Panel/Login.pm +++ b/lib/Fripost/Panel/Login.pm @@ -105,13 +105,12 @@ sub setup { # /domain/{user,alias,list}/?query_url my ($null,$domain,$local,$crap) = $self->split_path; - return 'ListDomains' unless (defined $null) and $null eq ''; + return 'ListDomains' if (defined $null) and $null ne ''; unless (defined $domain and $domain ne '') { - # TODO -# if (defined $a) { -# return 'AddDomain' if $a eq 'add'; -# } + if (defined $a) { + return 'AddDomain' if $a eq 'add'; + } return 'ListDomains'; } |