Fix error messages in database

CVS version numbers

Perl/Webwml/L10n/Db.pm: 1.1 -> 1.2

1 files changed, 2 insertions, 2 deletions

diff --git a/Perl/Webwml/L10n/Db.pm b/Perl/Webwml/L10n/Db.pm
index 61e3a567692..badc37059e0 100644
--- a/Perl/Webwml/L10n/Db.pm
+++ b/Perl/Webwml/L10n/Db.pm
@@ -230,10 +230,10 @@ sub write {
                 }
                 foreach (qw(Errors Warnings Catgets Gettext)) {
                         if (defined($self->{data}->{$pkg}->{lc $_})) {
-                                $text = join("\n\.", @{$self->{data}->{$pkg}->{lc $_}});
+                                $text = join("\.\n", @{$self->{data}->{$pkg}->{lc $_}})."\n";
                                 $text =~ s/^/ /mg;
                                 #  Warning: there is already a trailing
-                                #  newline within $text
+                                #  newline within $text.
                                 print DB $_.":\n".$text;
                         }
                 }