comparison lisp/international/mule-util.el @ 24338:3e873a016458

(decompose-region): Use insert-buffer-substring instead of insert-buffer to avoid putting mark.

24337:d9aef2d7c503

      (let ((tempbuf (current-buffer)))
	(save-excursion
	  (set-buffer buf)
	  (goto-char start)
	  (delete-region start end)
	  (insert-buffer tempbuf))))))

;;;###autoload
(defun decompose-string (string)
  "Decompose all composite characters in STRING."
  (let ((len (length string))

24338:3e873a016458

      (let ((tempbuf (current-buffer)))
	(save-excursion
	  (set-buffer buf)
	  (goto-char start)
	  (delete-region start end)
	  (insert-buffer-substring tempbuf))))))

;;;###autoload
(defun decompose-string (string)
  "Decompose all composite characters in STRING."
  (let ((len (length string))