* src/macfont.m (mac_font_shape): Make sure that total_advance is increasing.

[gnu-emacs] / admin / charsets / eucjp-ms.awk

diff --git a/admin/charsets/eucjp-ms.awk b/admin/charsets/eucjp-ms.awk
index f5876777b010a5bb2abad7be335f180a6597a078..24152b44eff18f1d3dc2db88870b2cec953d2b24 100644 (file)
--- a/admin/charsets/eucjp-ms.awk
+++ b/admin/charsets/eucjp-ms.awk
@@ -1,5 +1,5 @@
 # eucjp-ms.awk -- Generate a translation table for eucJP-ms.
-# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010
+# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
 #   National Institute of Advanced Industrial Science and Technology (AIST)
 #   Registration Number H13PRO009
 
@@ -24,7 +24,7 @@
 #  http://home.m05.itscom.net/numa/cde/ucs-conv/appendix.html
 # This program reads the mapping file EUC-JP-MS (of glibc) and
 # generates the Elisp file eucjp-ms.el that defines two translation
-# tables `eucjp-ms-decode' and `eucjp-ms-encode'.
+# tables 'eucjp-ms-decode' and 'eucjp-ms-encode'.
 
 BEGIN {
   FS = "[ \t][ \t]*"
@@ -38,7 +38,7 @@ BEGIN {
   JISX0208_FROM2 = "/xf5/xa1";
   JISX0212_FROM = "/x8f/xf3/xf3";
 
-  print ";;; eucjp-ms.el -- translation table for eucJP-ms. -*- no-byte-compile: t -*-";
+  print ";;; eucjp-ms.el -- translation table for eucJP-ms";
   print ";;; Automatically generated from /usr/share/i18n/charmaps/EUC-JP-MS.gz";
   print "(let ((map";
   print "       '(;JISEXT<->UNICODE";
@@ -107,7 +107,5 @@ END {
   print "      map)";
   print "  (define-translation-table 'eucjp-ms-encode map))";
   print "";
-  print ";; arch-tag: c4191096-288a-4f13-9b2a-ee7a1f11eb4a";
+  print "(provide 'eucjp-ms)";
 }
-
-# arch-tag: d9cc7af7-2d6e-48cd-8eed-a6d25226de7c