On 11 Apr 2001, Steve Youngs wrote: A calculater mode that doesn't support the keypad is really strange I think, but until someone fixes it you can always fill your .emacs/init.el: (I copied this from Robin Socha...) ; making the numpad work by Glynn Clements (define-key key-translation-map [kp-0] [?0]) (define-key key-translation-map [kp-1] [?1]) (define-key key-translation-map [kp-2] [?2]) (define-key key-translation-map [kp-3] [?3]) (define-key key-translation-map [kp-4] [?4]) (define-key key-translation-map [kp-5] [?5]) (define-key key-translation-map [kp-6] [?6]) (define-key key-translation-map [kp-7] [?7]) (define-key key-translation-map [kp-8] [?8]) (define-key key-translation-map [kp-9] [?9]) (define-key key-translation-map [kp-decimal] [?.]) (define-key key-translation-map [kp-divide] [?/]) (define-key key-translation-map [kp-multiply] [?*]) (define-key key-translation-map [kp-add] [?+]) (define-key key-translation-map [kp-subtract] [?-]) (define-key key-translation-map [kp-enter] [?\r]) (define-key key-translation-map [kp-left] [left]) (define-key key-translation-map [kp-right] [right]) (define-key key-translation-map [kp-up] [up]) (define-key key-translation-map [kp-down] [down]) (define-key key-translation-map [kp-prior] [prior]) (define-key key-translation-map [kp-next] [next]) (define-key key-translation-map [kp-home] [home]) (define-key key-translation-map [kp-end] [end]) (define-key key-translation-map [kp-insert] [insert]) (define-key key-translation-map [kp-delet] [delete]) (define-key key-translation-map [kp-0] [?0]) (define-key key-translation-map [kp-1] [?1]) (define-key key-translation-map [kp-2] [?2]) (define-key key-translation-map [kp-3] [?3]) (define-key key-translation-map [kp-4] [?4]) (define-key key-translation-map [kp-5] [?5]) (define-key key-translation-map [kp-6] [?6]) (define-key key-translation-map [kp-7] [?7]) (define-key key-translation-map [kp-8] [?8]) (define-key key-translation-map [kp-9] [?9]) (define-key key-translation-map [kp-decimal] [?.]) (define-key key-translation-map [kp-divide] [?/]) (define-key key-translation-map [kp-multiply] [?*]) (define-key key-translation-map [kp-add] [?+]) (define-key key-translation-map [kp-subtract] [?-]) (define-key key-translation-map [kp-enter] [?\r]) (define-key key-translation-map [kp-left] [left]) (define-key key-translation-map [kp-right] [right]) (define-key key-translation-map [kp-up] [up]) (define-key key-translation-map [kp-down] [down]) (define-key key-translation-map [kp-prior] [prior]) (define-key key-translation-map [kp-next] [next]) (define-key key-translation-map [kp-home] [home]) (define-key key-translation-map [kp-end] [end]) (define-key key-translation-map [kp-insert] [insert]) (define-key key-translation-map [kp-delet] [delete]) -- René