summaryrefslogtreecommitdiff
path: root/lisp/language/greek.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/language/greek.el')
-rw-r--r--lisp/language/greek.el14
1 files changed, 2 insertions, 12 deletions
diff --git a/lisp/language/greek.el b/lisp/language/greek.el
index 5ff5a58dbe9..632ae24a8ae 100644
--- a/lisp/language/greek.el
+++ b/lisp/language/greek.el
@@ -39,18 +39,8 @@
(defun setup-greek-environment ()
"Setup multilingual environment (MULE) for Greek."
(interactive)
- (setq coding-category-iso-8-1 'iso-8859-7)
-
- (set-coding-priority
- '(coding-category-iso-7
- coding-category-iso-8-1))
-
- (setq-default buffer-file-coding-system 'iso-8859-7)
- (set-terminal-coding-system 'iso-8859-7)
- (set-keyboard-coding-system 'iso-8859-7)
-
- (setq default-input-method '("Greek" . "quail-greek"))
- )
+ (setup-8-bit-environment 'greek-iso8859-7 'iso-8859-7
+ '("Greek" . "quail-greek")))
(set-language-info-alist
"Greek" '((setup-function . setup-greek-environment)