aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Schwab2011-02-04 11:45:46 +0100
committerAndreas Schwab2011-02-04 11:45:46 +0100
commitd93c111eaa6844eeac3271d4c2096e5207c2bc04 (patch)
treebb357283e6d4737b14f7ca48e31dbde72b3d9e88
parent2b7feab0099bda2082985b7c0dfb5de13de994f5 (diff)
downloademacs-d93c111eaa6844eeac3271d4c2096e5207c2bc04.tar.gz
emacs-d93c111eaa6844eeac3271d4c2096e5207c2bc04.zip
* international/mule-util.el (with-coding-priority): Doc fix.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/international/mule-util.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 72d9ab45011..37c7341a60b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12011-02-04 Andreas Schwab <schwab@linux-m68k.org>
2
3 * international/mule-util.el (with-coding-priority): Doc fix.
4
12011-02-04 Eli Zaretskii <eliz@gnu.org> 52011-02-04 Eli Zaretskii <eliz@gnu.org>
2 6
3 * arc-mode.el (archive-mode-map): Fix a typo in last change. 7 * arc-mode.el (archive-mode-map): Fix a typo in last change.
diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 59496266eaf..ef09cdda2de 100644
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -313,7 +313,7 @@ Optional 5th argument NIL-FOR-TOO-LONG non-nil means return nil
313;;;###autoload 313;;;###autoload
314(defmacro with-coding-priority (coding-systems &rest body) 314(defmacro with-coding-priority (coding-systems &rest body)
315 "Execute BODY like `progn' with CODING-SYSTEMS at the front of priority list. 315 "Execute BODY like `progn' with CODING-SYSTEMS at the front of priority list.
316CODING-SYSTEMS is a list of coding systems. See `set-coding-priority'. 316CODING-SYSTEMS is a list of coding systems. See `set-coding-system-priority'.
317This affects the implicit sorting of lists of coding sysems returned by 317This affects the implicit sorting of lists of coding sysems returned by
318operations such as `find-coding-systems-region'." 318operations such as `find-coding-systems-region'."
319 (let ((current (make-symbol "current"))) 319 (let ((current (make-symbol "current")))