Mercurial > emacs
comparison src/buffer.c @ 24240:6ea9058180ec
(Fset_buffer_multibyte): Error if buffer is multibyte.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 01 Feb 1999 11:17:41 +0000 |
| parents | 63e98b81cc29 |
| children | f401b26570a4 |
comparison
equal
deleted
inserted
replaced
| 24239:e6c0e87123a7 | 24240:6ea9058180ec |
|---|---|
| 1732 but the contents viewed as characters do change.") | 1732 but the contents viewed as characters do change.") |
| 1733 (flag) | 1733 (flag) |
| 1734 Lisp_Object flag; | 1734 Lisp_Object flag; |
| 1735 { | 1735 { |
| 1736 Lisp_Object tail, markers; | 1736 Lisp_Object tail, markers; |
| 1737 | |
| 1738 if (current_buffer->base_buffer) | |
| 1739 error ("Cannot do `set-buffer-multibyte' on an indirect buffer"); | |
| 1737 | 1740 |
| 1738 /* Do nothing if nothing actually changes. */ | 1741 /* Do nothing if nothing actually changes. */ |
| 1739 if (NILP (flag) == NILP (current_buffer->enable_multibyte_characters)) | 1742 if (NILP (flag) == NILP (current_buffer->enable_multibyte_characters)) |
| 1740 return flag; | 1743 return flag; |
| 1741 | 1744 |
