Mercurial > emacs

diff lisp/composite.el @ 89909:68c22ea6027c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Sync to HEAD
author Kenichi Handa <handa@m17n.org>
date Fri, 16 Apr 2004 12:51:06 +0000
parents df801f738c09
children cce1c0ee76ee
line wrap: on
line diff
--- a/lisp/composite.el	Thu Apr 15 01:08:34 2004 +0000
+++ b/lisp/composite.el	Fri Apr 16 12:51:06 2004 +0000
@@ -213,7 +213,7 @@
     (if (or (vectorp components) (listp components))
 	(setq components (encode-composition-components components)))
     (compose-region-internal start end components modification-func)
-    (set-buffer-modified-p modified-p)))
+    (restore-buffer-modified-p modified-p)))
 
 (defun decompose-region (start end)
   "Decompose text in the current region.
@@ -530,4 +530,6 @@
 (make-obsolete 'decompose-composite-char 'char-to-string "21.1")
 
 
+
+;;; arch-tag: ee703d77-1723-45d4-a31f-e9f0f867aa33
 ;;; composite.el ends here