(define-key mathematica-comint-mode-map [pause] 'comint-interrupt-subjob)
(define-key mathematica-comint-mode-map [C-pause] 'comint-quit-subjob)
(define-key mathematica-comint-mode-map [tab] 'dabbrev-expand)
+ (define-key mathematica-comint-mode-map [C-up] 'comint-previous-matching-input-from-input)
(use-local-map mathematica-comint-mode-map)
; don't split the frame unless it is already split.