ajout d'une demo sur les groupes atomiques qui montre

 - la diff�rence dans le traitement des callbacks
 - la diff�rence dans le traitement de find...

1 files changed, 4 insertions, 3 deletions

diff --git a/Perl/demos/zinc-demos b/Perl/demos/zinc-demos
index 3fe0d79..8d0c5e1 100644
--- a/Perl/demos/zinc-demos
+++ b/Perl/demos/zinc-demos
@@ -161,9 +161,10 @@ $T->insert('end', "6. Use of mapinfos.\n", [qw/demo demo-mapinfo/]);
 $T->insert('end', "\n", '', "Groups, Priority and Clipping\n", 'title');
 $T->insert('end', "1. Groups and Priorities.\n", [qw/demo demo-groups_priority/]);
 $T->insert('end', "2. Clipping examples (with simple or multiple contours).\n", [qw/demo demo-clipping/]);
-$T->insert('end', "3. \"Windows\" with four glasses using curve with multiple contours.\n", [qw/demo demo-window-contours/]);
-$T->insert('end', "4. A counter quite impossible to do without clipping (needs openGL).\n", [qw/demo demo-counter/]);
-$T->insert('end', "5. Use of path tags... to come.\n");
+$T->insert('end', "3. Group atomicity.\n", [qw/demo demo-atomic-groups/]);
+$T->insert('end', "4. \"Windows\" with four glasses using curve with multiple contours.\n", [qw/demo demo-window-contours/]);
+$T->insert('end', "5. A counter quite impossible to do without clipping (needs openGL).\n", [qw/demo demo-counter/]);
+$T->insert('end', "6. Use of path tags... to come.\n");
 
 $T->insert('end', "\n", '', "Interactions\n", 'title');
 $T->insert('end', "1. Simple interaction on a track.\n", [qw/demo demo-simple_interaction_track/]);