(detect-coding-with-priority): Fix the place of using `,' marker in

backguote form.

diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index ef4367ecf02947e68287e57c427155252f78004d..bbe07e99e5871a8fd0b75087eb458f0b70ece3f6 100644 (file)
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -271,7 +271,7 @@ or one is an alias of the other."
   "Detect a coding system of the text between FROM and TO with PRIORITY-LIST.
 PRIORITY-LIST is an alist of coding categories vs the corresponding
 coding systems ordered by priority."
-  `(with-coding-priority ,(mapcar #'cdr priority-list)
+  `(with-coding-priority (mapcar #'cdr ,priority-list)
      (detect-coding-region ,from ,to)))
 (make-obsolete 'detect-coding-with-priority
               "Use with-coding-priority and detect-coding-region" "22.1")