# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1026905589 0
# Node ID 438e610d8d06e2b6d837d36a8151e308c401d129
# Parent  012c455849bffcfd217c698de3d488adca996dee
(detect-coding-with-priority): Fix the place of using `,' marker in
backguote form.

diff -r 012c455849bf -r 438e610d8d06 lisp/international/mule-util.el
--- a/lisp/international/mule-util.el	Wed Jul 17 11:32:51 2002 +0000
+++ b/lisp/international/mule-util.el	Wed Jul 17 11:33:09 2002 +0000
@@ -271,7 +271,7 @@
   "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")