From cbb9c0fb327fb75b88888d8f24cce920e92c9cc1 Mon Sep 17 00:00:00 2001 From: morioka Date: Fri, 5 Jun 1998 12:04:29 +0000 Subject: [PATCH] (set-buffer-multibyte): New function. --- emu-mule.el | 14 ++++++++++++++ emu-nemacs.el | 14 ++++++++++++++ 2 files changed, 28 insertions(+) diff --git a/emu-mule.el b/emu-mule.el index 60bfbd2..4a69172 100644 --- a/emu-mule.el +++ b/emu-mule.el @@ -326,6 +326,20 @@ It must be symbol.") (cons lc-ascii (find-charset-region start end)))) +;;; @ buffer representation +;;; + +(defsubst-maybe set-buffer-multibyte (flag) + "Set the multibyte flag of the current buffer to FLAG. +If FLAG is t, this makes the buffer a multibyte buffer. +If FLAG is nil, this makes the buffer a single-byte buffer. +The buffer contents remain unchanged as a sequence of bytes +but the contents viewed as characters do change. +\[Emacs 20.3 emulating function]" + (setq mc-flag flag) + ) + + ;;; @ character ;;; diff --git a/emu-nemacs.el b/emu-nemacs.el index 7ed79b2..76ce540 100644 --- a/emu-nemacs.el +++ b/emu-nemacs.el @@ -322,6 +322,20 @@ find-file-hooks, etc. )) +;;; @ buffer representation +;;; + +(defsubst-maybe set-buffer-multibyte (flag) + "Set the multibyte flag of the current buffer to FLAG. +If FLAG is t, this makes the buffer a multibyte buffer. +If FLAG is nil, this makes the buffer a single-byte buffer. +The buffer contents remain unchanged as a sequence of bytes +but the contents viewed as characters do change. +\[Emacs 20.3 emulating function]" + (setq kanji-flag flag) + ) + + ;;; @ character ;;; -- 1.7.10.4