aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1998-01-09 22:59:31 +0000
committerRichard M. Stallman1998-01-09 22:59:31 +0000
commit115afec3199426e9c3cec469079b884724d92bc1 (patch)
treee9499d6206a4f1c0429b8291af63eec7ec00dd89 /src
parent5245463a5c37189f5517caca8574ee127ec2e1f4 (diff)
downloademacs-115afec3199426e9c3cec469079b884724d92bc1.tar.gz
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')
-rw-r--r--src/category.c9
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.")
63 CHECK_STRING (categories, 0); 63 CHECK_STRING (categories, 0);
64 val = MAKE_CATEGORY_SET; 64 val = MAKE_CATEGORY_SET;
65 65
66 if (STRING_MULTIBYTE (categories))
67 error ("Multibyte string in make-category-set");
68
66 len = XSTRING (categories)->size; 69 len = XSTRING (categories)->size;
67 while (--len >= 0) 70 while (--len >= 0)
68 { 71 {
@@ -486,7 +489,8 @@ describe_category (value)
486 } 489 }
487 490
488 mnemonics = Fcategory_set_mnemonics (value); 491 mnemonics = Fcategory_set_mnemonics (value);
489 insert_from_string (mnemonics, 0, XSTRING (mnemonics)->size, 0); 492 insert_from_string (mnemonics, 0, 0, XSTRING (mnemonics)->size,
493 XSTRING (mnemonics)->size_byte, 0);
490 insert_string ("\n"); 494 insert_string ("\n");
491 return; 495 return;
492} 496}
@@ -519,7 +523,8 @@ describe_category_1 (vector)
519 523
520 insert_char (i + 32); 524 insert_char (i + 32);
521 insert (": ", 2); 525 insert (": ", 2);
522 insert_from_string (elt, 0, XSTRING (elt)->size, 0); 526 insert_from_string (elt, 0, 0, XSTRING (elt)->size,
527 XSTRING (elt)->size_byte, 0);
523 insert ("\n", 1); 528 insert ("\n", 1);
524 } 529 }
525 } 530 }