Separate authors by commas, avoid space at the end.

diff --git a/doc/doxygen/scripts/code-gallery.pl b/doc/doxygen/scripts/code-gallery.pl
index 8f37c3732c825a79afa082627acef39ace2494c4..f83aa6fdbce1d854469ad6a27366b7b3abc342fe 100644 (file)
--- a/doc/doxygen/scripts/code-gallery.pl
+++ b/doc/doxygen/scripts/code-gallery.pl
@@ -39,9 +39,14 @@ foreach my $gallery (sort @ARGV)
     open AUTHOR, "<$gallery_dir/$gallery/doc/author";
     my $authors;
     while (my $line = <AUTHOR>) {
-        $authors .= $line;
+        chop $line;
+        $authors .= $line . ", ";
     }
 
+    # remove trailing whitespaces, as well as the trailing comma
+    chop $authors;
+    $authors =~ s/,$//;
+
     $gallery_underscore    =~ s/-/_/;
     print "  <dt><b>\@ref code_gallery_${gallery_underscore} \"$gallery\"</b> (by $authors)</dt>\n";
     print "    <dd>\n";