From 567b103cfa245b77736bd8339f274f42b5c8a0c0 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 12 May 1997 07:00:28 +0000 Subject: [PATCH] (viqr-pre-write-conversion): Make it work for the case the arg FROM is a string. --- lisp/language/viet-util.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el index 356a130efc3..1da3de12a4a 100644 --- a/lisp/language/viet-util.el +++ b/lisp/language/viet-util.el @@ -275,8 +275,12 @@ positions (integers or markers) specifying the stretch of the region." (work-buf (get-buffer-create " *viet-work*"))) (set-buffer work-buf) (erase-buffer) - (insert-buffer-substring old-buf from to) - (viet-encode-viqr-region (point-min) (point-max)))) + (if (stringp from) + (insert from) + (insert-buffer-substring old-buf from to)) + (viet-encode-viqr-region (point-min) (point-max)) + ;; Should return nil as annotations. + nil)) ;;; (provide 'language/viet-util) -- 2.39.5