diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-01-09 22:59:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-01-09 22:59:31 +0000 |
| commit | 115afec3199426e9c3cec469079b884724d92bc1 (patch) | |
| tree | e9499d6206a4f1c0429b8291af63eec7ec00dd89 /src/category.c | |
| parent | 5245463a5c37189f5517caca8574ee127ec2e1f4 (diff) | |
| download | emacs-115afec3199426e9c3cec469079b884724d92bc1.tar.gz emacs-115afec3199426e9c3cec469079b884724d92bc1.tar.bz2 emacs-115afec3199426e9c3cec469079b884724d92bc1.zip | |
(Fmake_category_set): Don't allow multibyte string.
(describe_category): Pass new args to insert_from_string.
(describe_category_1): Likewise.
Diffstat (limited to 'src/category.c')
| -rw-r--r-- | src/category.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/category.c b/src/category.c index 94739b0eff7..8e6097258de 100644 --- a/src/category.c +++ b/src/category.c @@ -63,6 +63,9 @@ CATEGORIES is a string of category mnemonics.") CHECK_STRING (categories, 0); val = MAKE_CATEGORY_SET; + if (STRING_MULTIBYTE (categories)) + error ("Multibyte string in make-category-set"); + len = XSTRING (categories)->size; while (--len >= 0) { @@ -486,7 +489,8 @@ describe_category (value) } mnemonics = Fcategory_set_mnemonics (value); - insert_from_string (mnemonics, 0, XSTRING (mnemonics)->size, 0); + insert_from_string (mnemonics, 0, 0, XSTRING (mnemonics)->size, + XSTRING (mnemonics)->size_byte, 0); insert_string ("\n"); return; } @@ -519,7 +523,8 @@ describe_category_1 (vector) insert_char (i + 32); insert (": ", 2); - insert_from_string (elt, 0, XSTRING (elt)->size, 0); + insert_from_string (elt, 0, 0, XSTRING (elt)->size, + XSTRING (elt)->size_byte, 0); insert ("\n", 1); } } |