X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/6f598a6d4f49be103135af72c60569f27886f0a5..19b4af8286ff26d745f09e3fdb2606e12fc9fa82:/src/category.c

diff --git a/src/category.c b/src/category.c
index 524823b69f..c74b483e7d 100644
--- a/src/category.c
+++ b/src/category.c
@@ -276,8 +276,8 @@ DEFUN ("set-category-table", Fset_category_table, Sset_category_table, 1, 1, 0,
   table = check_category_table (table);
   current_buffer->category_table = table;
   /* Indicate that this buffer now has a specified category table.  */
-  idx = BUFFER_LOCAL_VAR_IDX (category_table);
-  SET_BUFFER_HAS_LOCAL_VALUE_P (current_buffer, idx, 1);
+  idx = PER_BUFFER_VAR_IDX (category_table);
+  SET_PER_BUFFER_VALUE_P (current_buffer, idx, 1);
   return table;
 }
 
@@ -394,7 +394,7 @@ If optional fourth argument RESET is non-nil,\n\
       return Qnil;
     }
 
-  SPLIT_NON_ASCII_CHAR (c, charset, c1, c2);
+  SPLIT_CHAR (c, charset, c1, c2);
 
   /* The top level table.  */
   val = XCHAR_TABLE (table)->contents[charset + 128];