;;; Dragon Dictate customization file for emacs ;;; by Gary T. Leavens ;;; ;;; Last update $Date: 2006/01/21 20:02:27 $ ;;; The key bindings are for Dragon Dictate Naturally Speaking ;;; (I use the Preferred Edition, version 8), as passed through kermit. ;;; Most key bindings are handled adequately by cua mode (which see); ;;; however, Kermit seems to make some strange things happen, ;;; which are compensated for here. (fset 'do-nothing (lambda () "Don't do anything." (interactive))) (global-set-key [kp-delete] 'delete-char) (define-key (current-global-map) "\M-On" [kp-delete]) (define-key (current-global-map) "\M-Op" [kp-insert]) (define-key (current-global-map) "\M-Oq" [kp-end]) (define-key (current-global-map) "\M-Or" [kp-down]) (global-set-key "\M-Os" 'scroll-up) (define-key (current-global-map) "\M-Ot" [S-kp-left]) (define-key (current-global-map) "\M-Ov" [kp-right]) (define-key (current-global-map) "\M-Ow" [kp-home]) (define-key (current-global-map) "\M-Ox" [kp-up]) (global-set-key "\M-Oy" 'scroll-down)