wok-next view emacs-pkg-text-translator/stuff/90-text-translator-init.el @ rev 14730

Up xorg-xf86-video-ati (7.1.0), xorg-xf86-video-fbdev (0.4.3), xorg-xf86-video-geode (2.11.14), xorg-xf86-video-i740 (1.3.4), xorg-xf86-video-neomagic (1.2.7), xorg-xf86-video-nv (2.1.20), xorg-xf86-video-s3 (0.6.5), xorg-xf86-video-trident (1.3.6), xorg-xf86-video-vesa (2.3.2), xorg-xf86-video-vmware (13.0.1)
author Pascal Bellard <pascal.bellard@slitaz.org>
date Thu Jun 13 10:45:31 2013 +0200 (2013-06-13)
parents
children
line source
1 ;; Register
3 (require 'text-translator)
6 ;; set global key
8 (global-set-key "\C-x\M-t" 'text-translator)
9 (global-set-key "\C-x\M-T" 'text-translator-translate-last-string)
10 ;; translate all sites.
11 ;; for example, if you specify "enja", text-translator use google.com_enja, yahoo.com_enja, ... .
12 (global-set-key "\C-x\M-a" 'text-translator-all)
15 ;; add keys to major-mode
17 (add-hook
18 'text-translator-mode-hook
19 (lambda()
20 ;; if you do not change prefix-key, it is executed by C-c M-a
21 (define-key text-translator-mode-pkey-map "\M-a" 'text-translator-translate-recent-type)))
24 ;; use proxy
26 ;; ;; if you are setting environment variables HTTP_PROXY,
27 ;; ;; you have not to set this.
28 ;; (setq text-translator-proxy-server "proxy.hogehoge.com")
29 ;; (setq text-translator-proxy-port 8080)