From fa151336fcc8032bf8000f2bfa933c7f6621cb9f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 11 Nov 1995 20:39:37 +0000 Subject: (describe-buffer-case-table): Use set-char-table-range. --- lisp/case-table.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/case-table.el') diff --git a/lisp/case-table.el b/lisp/case-table.el index 3efa3d3f27e..4ca99806015 100644 --- a/lisp/case-table.el +++ b/lisp/case-table.el @@ -40,7 +40,7 @@ (let ((description (make-char-table 'case-table))) (map-char-table (function (lambda (key value) - (set-case-table-range + (set-char-table-range description key (cond ((null key) "case-invariant") -- cgit v1.2.1