(cvs-qtypedesc-strings): Use new names

combine-and-quote-strings and split-string-and-unquote.

diff --git a/lisp/pcvs-util.el b/lisp/pcvs-util.el
index 6991f79652633d267aef84fbaf9afe58f74f5ff4..e5ab1638c6013efcf131e4cfd5eb0deed6a001cd 100644 (file)
--- a/lisp/pcvs-util.el
+++ b/lisp/pcvs-util.el
@@ -211,7 +211,8 @@ arguments.  If ARGS is not a list, no argument will be passed."
 (defconst cvs-qtypedesc-string1 (cvs-qtypedesc-create 'identity 'identity t))
 (defconst cvs-qtypedesc-string (cvs-qtypedesc-create 'identity 'identity))
 (defconst cvs-qtypedesc-strings
-  (cvs-qtypedesc-create 'string->strings 'strings->string nil))
+  (cvs-qtypedesc-create 'split-string-and-unquote
+                       'combine-and-quote-strings nil))
 
 (defun cvs-query-read (default prompt qtypedesc &optional hist-sym)
   (let* ((qtypedesc (or qtypedesc cvs-qtypedesc-strings))