diff options
Diffstat (limited to 'lisp/composite.el')
| -rw-r--r-- | lisp/composite.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/composite.el b/lisp/composite.el index b5072de5a40..c2289e8998f 100644 --- a/lisp/composite.el +++ b/lisp/composite.el @@ -739,9 +739,9 @@ All non-spacing characters have this function in (let ((elt `([,(purecopy "\\c.\\c^+") 1 compose-gstring-for-graphic] [nil 0 compose-gstring-for-graphic]))) (map-char-table - (lambda (key val) - (if (memq val '(Mn Mc Me)) - (set-char-table-range composition-function-table key elt))) + #'(lambda (key val) + (if (memq val '(Mn Mc Me)) + (set-char-table-range composition-function-table key elt))) unicode-category-table)) ;; for dotted-circle (aset composition-function-table #x25CC |