Patch : list creation with WWSympa

[Olivier Salaun <adresse@cachée>]

We were reported the following bug with WWSympa :

        When a pending list is either activated by the listmaster
        or setup by the listowner, list config files are saved with :
                1/ send  closed
                2/ visibility conceal
        Thereby loosing the listowner's choices for these parameters.

Please find enclosed a bug fix for Sympa 3.2.1.

--
Olivier Salaün
Comité Réseau des Universités*** src/List.pm.orig    Fri Sep 28 17:14:10 2001
--- src/List.pm Fri Sep 28 17:11:15 2001
***************
*** 3147,3152 ****
--- 3147,3159 ----
            return undef ;
        }
  
+       ## pending/closed lists => send/visibility are closed
+       unless ($list->{'admin'}{'status'} eq 'open') {
+           if ($operation =~ /^send|visibility$/) {
+               return 'undef';
+           }
+       }
+ 
        ### the following lines are used by the document sharing action 
        if (defined $context->{'scenario'}) { 
            # information about the  scenario to load
***************
*** 5655,5667 ****
        }
      }
  
!     ## This default setting MUST BE THE LAST ONE PERFORMED
!     if ($admin{'status'} ne 'open') {
!       ## requested and closed list are just list hidden using visibility 
parameter
!       ## and with send parameter set to closed.
!       $admin{'send'} = &_load_list_param('send', 'closed', 
$::pinfo{'send'}, $directory);
!       $admin{'visibility'} = &_load_list_param('visibility', 'conceal', 
$::pinfo{'visibility'}, $directory);
!     }
  
      ## reception of default_user_options must be one of reception of
      ## available_user_options. If none, warning and put reception of
--- 5662,5674 ----
        }
      }
  
! #    ## This default setting MUST BE THE LAST ONE PERFORMED
! #    if ($admin{'status'} ne 'open') {
! #     ## requested and closed list are just list hidden using visibility 
parameter
! #     ## and with send parameter set to closed.
! #     $admin{'send'} = &_load_list_param('send', 'closed', 
$::pinfo{'send'}, $directory);
! #     $admin{'visibility'} = &_load_list_param('visibility', 'conceal', 
$::pinfo{'visibility'}, $directory);
! #   }
  
      ## reception of default_user_options must be one of reception of
      ## available_user_options. If none, warning and put reception of