Mercurial > hg > xemacs-beta
comparison tests/automated/mule-tests.el @ 4650:8905163c49c5
#'find-file: set b-f-c-s even on error (cf. non-existent files),
handle undecided coding-systems passed back from
#'insert-file-contents-internal better.
tests/ChangeLog addition:
2009-07-13 Aidan Kehoe <kehoea@parhasard.net>
* automated/mule-tests.el:
Now that find-file on a nonexistent path gives a modified buffer,
we want to set this kind of buffer to be non-modified here before
killing it.
lisp/ChangeLog addition:
2009-07-13 Aidan Kehoe <kehoea@parhasard.net>
* code-files.el (insert-file-contents):
Set the buffer coding system even on error; especially important
when dealing with nonexistent files.
If the `coding-system' property of an undecided coding system is
itself undecided, don't use that as a value for
buffer-file-coding-system.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Mon, 13 Jul 2009 20:45:26 +0100 |
| parents | e4ed58cb0e5b |
| children | 938ffa3ffe4d |
comparison
equal
deleted
inserted
replaced
| 4649:3972966a4588 | 4650:8905163c49c5 |
|---|---|
| 156 buffer-file-coding-system)) | 156 buffer-file-coding-system)) |
| 157 (kill-buffer nil) | 157 (kill-buffer nil) |
| 158 (find-file nonexistent-file-name coding-system) | 158 (find-file nonexistent-file-name coding-system) |
| 159 (Assert (eq (find-coding-system coding-system) | 159 (Assert (eq (find-coding-system coding-system) |
| 160 buffer-file-coding-system)) | 160 buffer-file-coding-system)) |
| 161 (set-buffer-modified-p nil) | |
| 161 (kill-buffer nil))) | 162 (kill-buffer nil))) |
| 162 (delete-file existing-file-name)) | 163 (delete-file existing-file-name)) |
| 163 | 164 |
| 164 ;;----------------------------------------------------------------- | 165 ;;----------------------------------------------------------------- |
| 165 ;; Test string modification functions that modify the length of a char. | 166 ;; Test string modification functions that modify the length of a char. |