From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 19 Mar 2004 02:33:17 +0000 (+0000)
Subject: (compose-region): Use restore-buffer-modified-p.
X-Git-Tag: ttn-vms-21-2-B4~7211
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e3748ba235e2ad39c5a0d467fe3148097fa57130;p=emacs.git

(compose-region): Use restore-buffer-modified-p.
---

diff --git a/lisp/composite.el b/lisp/composite.el
index fa69ac6ff83..8361e2ad9e3 100644
--- a/lisp/composite.el
+++ b/lisp/composite.el
@@ -193,7 +193,7 @@ text in the composition."
     (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)))
 
 ;;;###autoload
 (defun decompose-region (start end)