[sympa-fr] Suppression d'abonn� impossible des listes

[<adresse@cachée>]

Bonjour,

J'essaye de supprimer au travers de l'interface web, en tant que listmaster, 
un
abonné d'une liste particulière.
Mais j'obtiens toujours en résultat : *"0 addresses have been removed"* et
l'utilisateur est toujours bien présent.

nous utilisons une  base oracle 10  avec sympa 5.4.7

Nous avons une log dans apache :

[Wed Aug 12 14:37:59 2009] [warn] mod_fcgid: stderr: DBD::Oracle::db prepare
failed: ORA-00972: identifier is too long (DBD ERROR: OCIStmtPrepare) [for
Statement "SELECT user_subscriber "email", comment_subscriber "gecos",
bounce_subscriber "bounce", bounce_score_subscriber "bounce_score",
bounce_address_subscriber "bounce_address", reception_subscriber "reception",
topics_subscriber "topics", visibility_subscriber "visibility",
((to_number(to_char(date_subscriber,'J')) -
to_number(to_char(to_date('01/01/1970','dd/mm/yyyy'), 'J'))) * 86400)
+to_number
[Wed Aug 12 14:37:59 2009] [warn] mod_fcgid: stderr:
(to_char(date_subscriber,'SSSSS')) "date",
((to_number(to_char(update_subscriber,'J')) -
to_number(to_char(to_date('01/01/1970','dd/mm/yyyy'), 'J'))) * 86400)
+to_number(to_char(update_subscriber,'SSSSS')) "update_date",
subscribed_subscriber "subscribed", included_subscriber "included",
include_sources_subscriber "id", custom_attribute_subscriber 
"custom_attribute 
 FROM subscriber_table WHERE (user_subscriber = '.........

J'ai pu extraire la requete des logs qui une fois executée directement dans 
la
base en sql donne le même message ORA-00972: identifier is too long

Alors, j'ai trouvé une " mal placée. En modifiant le fichier source
/opt/sympa/bin/List.pm, la requete passe bien. Voici :

 diff List.pm List.pm.ori
4700c4700
<       $statement = sprintf "SELECT user_subscriber \"email\",
comment_subscriber \"gecos\", bounce_subscriber \"bounce\",
bounce_score_subscriber \"bounce_score\", bounce_address_subscriber
\"bounce_address\", reception_subscriber \"reception\", topics_subscriber
\"topics\", visibility_subscriber \"visibility\", %s \"date\", %s
\"update_date\", subscribed_subscriber \"subscribed\", included_subscriber
\"included\", include_sources_subscriber \"id\", custom_attribute_subscriber
\"custom_attribute\"  %s FROM subscriber_table WHERE (user_subscriber = %s AND
list_subscriber = %s AND robot_subscriber = %s)", 
---
>       $statement = sprintf "SELECT user_subscriber \"email\",
comment_subscriber \"gecos\", bounce_subscriber \"bounce\",
bounce_score_subscriber \"bounce_score\", bounce_address_subscriber
\"bounce_address\", reception_subscriber \"reception\", topics_subscriber
\"topics\", visibility_subscriber \"visibility\", %s \"date\", %s
\"update_date\", subscribed_subscriber \"subscribed\", included_subscriber
\"included\", include_sources_subscriber \"id\", custom_attribute_subscriber
\"custom_attribute\  %s FROM subscriber_table WHERE (user_subscriber = %s AND
list_subscriber = %s AND robot_subscriber = %s)",

(chercher la " apres custom_attribute)

Avez-vous constaté ce problème ?

Merci pour votre aide 

Jérôme