From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Thu, 30 Sep 2010 13:00:09 +0000 (+0200)
Subject: Bei Emacs sind die Charsets lowercase: "iso-8859-15" anstelle von "ISO-8859-15"
X-Git-Tag: release-2.6.2beta1~110^2~6^2
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=46835bedd494a84c604484be03142615a4ceb41f;p=kivitendo-erp.git

Bei Emacs sind die Charsets lowercase: "iso-8859-15" anstelle von "ISO-8859-15"
---

diff --git a/locale/de/all b/locale/de/all
index 18b6d398f..2e4ad9b28 100644
--- a/locale/de/all
+++ b/locale/de/all
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# -*- coding: ISO-8859-15; -*-
+# -*- coding: iso-8859-15; -*-
 # vim: fenc=ISO-8859-15
 
 # These are all the texts to build the translations files.
diff --git a/scripts/locales.pl b/scripts/locales.pl
index d156ddd03..fa787a24b 100755
--- a/scripts/locales.pl
+++ b/scripts/locales.pl
@@ -601,7 +601,9 @@ sub generate_file {
 
   open my $fh, '>', $file or die "$! : $file";
 
-  print $fh "#!/usr/bin/perl\n# -*- coding: $charset; -*-\n# vim: fenc=$charset\n\n";
+  my $emacs_charset = lc $charset;
+
+  print $fh "#!/usr/bin/perl\n# -*- coding: $emacs_charset; -*-\n# vim: fenc=$charset\n\n";
   print $fh $header, "\n" if $header;
   print $fh "$data_name = $delim[0]\n" if $data_name;