diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el
index de5f000089a..95187d5d117 100644
--- a/lisp/term/xterm.el
+++ b/lisp/term/xterm.el
@@ -394,6 +394,9 @@ Return the pasted text as a string."
     (define-key map "\eOx" [kp-8])
     (define-key map "\eOy" [kp-9])
 
+    ;; Some keypads have an equal key (for instance, most Apple keypads).
+    (define-key map "\eOX" [kp-equal])
+
     (define-key map "\eO2j" [S-kp-multiply])
     (define-key map "\eO2k" [S-kp-add])
     (define-key map "\eO2l" [S-kp-separator])