From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 11 Feb 2008 17:40:11 +0000 (+0000)
Subject: (ucs-insert): Inherit surrounding properties like self-insert-command.
X-Git-Tag: emacs-pretest-23.0.90~7999
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=46772c240a46d5a35bc2b6ac6a54eca487a871dd;p=emacs.git

(ucs-insert): Inherit surrounding properties like self-insert-command.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 660a1072ee7..e52057bb9b8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-02-11  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* international/mule-cmds.el (ucs-insert): Inherit surrounding
+	properties like self-insert-command.
+
 2008-02-11  Drew Adams  <drew.adams@oracle.com>
 
 	* progmodes/etags.el: Add many doc strings.
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 0621900ce4f..9ff771d7137 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2854,7 +2854,7 @@ Interactively, prompts for a hex string giving the code."
       (setq arg (string-to-number arg 16)))
   (if (or (< arg 0) (> arg #x10FFFF))
       (error "Not a Unicode character code: 0x%X" arg))
-  (insert arg))
+  (insert-and-inherit arg))
 
 
 ;; arch-tag: b382c432-4b36-460e-bf4c-05efd0bb18dc