Fix recent bootstrap issue by moving string-to-list

* lisp/international/mule-util.el (string-to-list, string-to-vector):
Move from here...
* lisp/subr.el (string-to-list, string-to-vector): ...to here.
The implementation is trivial and at least string-to-list
has ended up being needed early during bootstrap.

diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 06b63eae370b237ff6c2dce52f06e995a1bc98eb..92a658655ac3caa157d8da0e94e77d04c1cf283a 100644 (file)
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -32,16 +32,6 @@
 
 ;;; String manipulations while paying attention to multibyte characters.
 
-;;;###autoload
-(defsubst string-to-list (string)
-  "Return a list of characters in STRING."
-  (append string nil))
-
-;;;###autoload
-(defsubst string-to-vector (string)
-  "Return a vector of characters in STRING."
-  (vconcat string))
-
 ;;;###autoload
 (defun store-substring (string idx obj)
   "Embed OBJ (string or character) at index IDX of STRING."

diff --git a/lisp/subr.el b/lisp/subr.el
index a204577ddf94094c28403c663e7b7e5aaf9ba0ef..4f848d1400c749d6f615d7c7641f7dbaa62e7804 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2875,6 +2875,14 @@ See Info node `(elisp)Security Considerations'."
        (replace-regexp-in-string "[^-0-9a-zA-Z_./\n]" "\\\\\\&" argument))))
    ))
 
+(defsubst string-to-list (string)
+  "Return a list of characters in STRING."
+  (append string nil))
+
+(defsubst string-to-vector (string)
+  "Return a vector of characters in STRING."
+  (vconcat string))
+
 (defun string-or-null-p (object)
   "Return t if OBJECT is a string or nil.
 Otherwise, return nil."