diff options
| author | Lars Magne Ingebrigtsen | 2011-07-13 16:34:10 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2011-07-13 16:34:10 +0200 |
| commit | bb388cc58ba4b00c7a30b399760058024030a35e (patch) | |
| tree | d4a63d1e43f6b08bea023069f1117fddd2484458 | |
| parent | 343c3b5a4ed1e8cab5ca6dde473c3a151364dd2b (diff) | |
| download | emacs-bb388cc58ba4b00c7a30b399760058024030a35e.tar.gz emacs-bb388cc58ba4b00c7a30b399760058024030a35e.zip | |
(prefer-coding-system): Add an example
Fixes: debbugs:4869
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/international/mule-cmds.el | 6 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 717ad6d94f5..87d62690f7c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2011-07-13 Lars Magne Ingebrigtsen <larsi@gnus.org> | 1 | 2011-07-13 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 2 | ||
| 3 | * international/mule-cmds.el (prefer-coding-system): Add an | ||
| 4 | example (bug#4869). | ||
| 5 | |||
| 3 | * progmodes/etags.el (tags-search): Document `file-list-form' | 6 | * progmodes/etags.el (tags-search): Document `file-list-form' |
| 4 | (bug#4731). | 7 | (bug#4731). |
| 5 | 8 | ||
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index e75a22d6415..6a73aaaa838 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -397,7 +397,11 @@ If CODING-SYSTEM specifies a certain type of EOL conversion, the coding | |||
| 397 | systems set by this function will use that type of EOL conversion. | 397 | systems set by this function will use that type of EOL conversion. |
| 398 | 398 | ||
| 399 | A coding system that requires automatic detection of text+encoding | 399 | A coding system that requires automatic detection of text+encoding |
| 400 | \(e.g. undecided, unix) can't be preferred." | 400 | \(e.g. undecided, unix) can't be preferred. |
| 401 | |||
| 402 | To prefer, for instance, utf-8, say the following: | ||
| 403 | |||
| 404 | \(prefer-coding-system 'utf-8)" | ||
| 401 | (interactive "zPrefer coding system: ") | 405 | (interactive "zPrefer coding system: ") |
| 402 | (if (not (and coding-system (coding-system-p coding-system))) | 406 | (if (not (and coding-system (coding-system-p coding-system))) |
| 403 | (error "Invalid coding system `%s'" coding-system)) | 407 | (error "Invalid coding system `%s'" coding-system)) |