Merge pull request #491 from ikedas/issue-490 by ikedas

Crash in create_list_request when list name is missing #490

src/lib/Sympa/Aliases.pm

@@ -93,8 +93,10 @@ sub check_new_listname {
     my $listname = shift;
     my $robot_id = shift;
 
-    die 'bug in logic. Ask developer'
-        unless defined $listname and length $listname;
+    unless (defined $listname and length $listname) {
+        $log->syslog('err', 'No listname');
+        return ('user', 'listname_needed');
+    }
 
     $listname = lc $listname;
 

src/lib/Sympa/Request/Handler/move_list.pm

@@ -60,7 +60,7 @@ sub _twist {
 
     my $robot_id     = $request->{context};
     my $current_list = $request->{current_list};
-    my $listname     = lc $request->{listname};
+    my $listname     = lc($request->{listname} || '');
     my $mode         = $request->{mode};
     my $pending      = $request->{pending};
     my $notify       = $request->{notify};