1 files changed, 1 insertions, 1 deletions

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")