Installation sans DBI

[Olivier Salaun - CRU <adresse@cachée>]

J'ai parle un peu vite...Sympa demande le module Perl DBI pour fonctionner.

Ci-joint un petit patch à appliquer sur List.pm qui corrige cela et vous
permettra d'utiliser Sympa 2.2b sans installer le module DBI. Le patch 
corrige 
aussi un pb de mise à jour du nombre d'abonnés.

Olivier
--- List.pm.orig        Thu Apr  1 09:26:19 1999
+++ List.pm     Thu Apr  1 16:02:45 1999
@@ -38,7 +38,6 @@
 sequence number. Does nothing if no stats.
 
 =item send_sub_to_owner ( WHO, COMMENT )
-
 Send a message to the list owners telling that someone
 wanted to subscribe to the list.
 
@@ -191,7 +190,10 @@
 ## Connect to Database
 sub db_connect {
 
-    use DBI;
+    unless (require DBI) {
+       do_log ('debug',"enable to use DBI library, install DBI (CPAN) 
first");
+       return undef;
+    }
 
     my $connect_string = sprintf 'DBI:%s:dbname=%s;host=%s', 
$Conf{'db_type'}, $Conf{'db_name'}, $Conf{'db_host'};
     unless ( $dbh = DBI->connect($connect_string, $Conf{'db_user'}, 
$Conf{'db_passwd'}) ) {
@@ -751,7 +753,8 @@
                return undef;
            }   
 
-           $self->{'total'}--;
+           $self->lmb-actu
+{'total'}--;
 
        }else {
            my $users = $self->{'users'};