(defun greek-input (arg)
  (interactive "p")
  (set-input-method 'greek))

(defun russian-input (arg)
  (interactive "p")
  (set-input-method 'cyrillic-yawerty))


(set-language-environment 'utf-8)

(global-set-key "\M-g" 'greek-input)
(global-set-key "\M-r" 'russian-input)
(setq w3-default-homepage "http://localhost/cgi-bin/dict.cgi")