From 48e3f3d7a4b2345b89d5a0a4f1ab7bd97f1896b3 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 18 Nov 2001 06:49:25 +0000 Subject: [PATCH] (string-to-sequence): Make it obsolete. (string-to-list, string-to-vector): Implement them directly using append and vconcat, not with string-to-sequence. --- lisp/international/mule-util.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el index f66420a8686..e0ad655cbde 100644 --- a/lisp/international/mule-util.el +++ b/lisp/international/mule-util.el @@ -56,16 +56,19 @@ TYPE should be `list' or `vector'." (error "Invalid type: %s" type))) ;;; val) ) +(make-obsolete 'string-to-sequence + "Use `string-to-list' or `string-to-vector'" + "21.3") ;;;###autoload (defsubst string-to-list (string) "Return a list of characters in STRING." - (string-to-sequence string 'list)) + (append string nil)) ;;;###autoload (defsubst string-to-vector (string) "Return a vector of characters in STRING." - (string-to-sequence string 'vector)) + (vconcat string)) ;;;###autoload (defun store-substring (string idx obj) -- 2.39.5