diff --git a/ChangeLog b/ChangeLog
index 62da5534a..1cc9f3b7c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2004-11-22  Alexandre Duret-Lutz  <adl@src.lip6.fr>
 
+	* src/sanity/style.test: Allow "'" after ",".
+
 	* src/tgbaalgos/gv04.cc, src/tgbaalgos/gv04.hh: New files, partly
 	based on Thomas Martinez's src/tgbaalgos/tarjan_on_fly.cc and
 	src/tgbaalgos/tarjan_on_fly.hh former implementation.
diff --git a/src/sanity/style.test b/src/sanity/style.test
index c1382db2e..446d7b055 100755
--- a/src/sanity/style.test
+++ b/src/sanity/style.test
@@ -90,7 +90,7 @@ for dir in "${INCDIR-..}" "${INCDIR-..}"/../iface; do
     grep '! ' $tmp &&
       diag 'No space after unary operators (!).'
 
-    grep ',[^ "%]' $tmp &&
+    grep ",[^ \"%']" $tmp &&
       diag 'Space after coma.'
 
     grep '[^	 ]&&[^	 ]' $tmp &&