* international/mule-cmds.el (ucs-names): Exclude new "Enclosed

  Ideographic Supplement" range (U+1F200..U+1F2FF).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a6c77c6c03d303211ca9a467e2d34f96882513a3..5856ae9203a255f1a9207ea3412057f415f56b17 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,15 +1,19 @@
+2009-10-09  Juanma Barranquero  <lekktu@gmail.com>
+
+       * international/mule-cmds.el (ucs-names): Exclude new "Enclosed
+       Ideographic Supplement" range (U+1F200..U+1F2FF).
+
 2009-10-09  Karl Fogel  <kfogel@red-bean.com>
 
        * bookmark.el (bookmark-bmenu-rename): Don't call bookmark-bmenu-list,
-         since the list will have been rebuilt anyway.  (Bug#4349)
+       since the list will have been rebuilt anyway.  (Bug#4349)
 
 2009-10-09  Karl Fogel  <kfogel@red-bean.com>
 
-       * bookmark.el (bookmark-delete): Don't let batch arg prevent
-       saving.
+       * bookmark.el (bookmark-delete): Don't let batch arg prevent saving.
        (bookmark-bmenu-execute-deletions): Don't save here, as
        bookmark-delete will now do so if necessary.
-       Suggested by: Thierry Volpiatto <thierry.volpiatto {_AT_} gmail.com>
+       Suggested by Thierry Volpiatto <thierry.volpiatto {_AT_} gmail.com>.
        (Bug#4348)
 
 2009-10-09  Glenn Morris  <rgm@gnu.org>

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index b9ae96f4ff0315cec4cdfe2c69c22b5ed0a53389..5ae8290687e3dac6a64dd1b9fca5d2e91f9d77e0 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2893,7 +2893,8 @@ on encoding."
                         (and (>= c #x3400 ) (<= c #x4dbf )) ; CJK Ideograph Extension A
                         (and (>= c #x4e00 ) (<= c #x9fff )) ; CJK Ideograph
                         (and (>= c #xd800 ) (<= c #xfaff )) ; Private/Surrogate
-                        (and (>= c #x20000) (<= c #x2ffff)) ; CJK Ideograph Extension B
+                        (and (>= c #x1f200) (<= c #x1f2ff)) ; Enclosed Ideographic Supplement
+                        (and (>= c #x20000) (<= c #x2ffff)) ; CJK Ideograph Extensions B, C
                         )
                  (if (setq name (get-char-code-property c 'name))
                      (setq names (cons (cons name c) names)))