From 35c4ad13a52bdcaab251358e4b7df99dd852c76d Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@fripost.org>
Date: Sun, 20 Jan 2013 03:04:17 +0100
Subject: New domains.

---
 lib/Fripost/Panel/Login.pm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

(limited to 'lib/Fripost/Panel/Login.pm')

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';
         }
 
-- 
cgit v1.2.3