Gecko [ goons4good.org ]

Name	Size	Permission	Date
burmese.elc	1.46 KB	-rw-r--r--	2023-06-07 04:19
cham.elc	842 B	-rw-r--r--	2023-06-07 04:19
china-util.elc	3.36 KB	-rw-r--r--	2023-06-07 04:04
chinese.elc	7.11 KB	-rw-r--r--	2023-06-07 04:18
cyril-util.elc	5.12 KB	-rw-r--r--	2023-06-07 04:04
cyrillic.elc	5.4 KB	-rw-r--r--	2023-06-07 04:18
czech.elc	1.04 KB	-rw-r--r--	2023-06-07 04:18
english.elc	1.2 KB	-rw-r--r--	2023-06-07 04:18
ethio-util.elc	54.9 KB	-rw-r--r--	2023-06-07 04:04
ethiopic.elc	1.86 KB	-rw-r--r--	2023-06-07 04:18
european.elc	16.37 KB	-rw-r--r--	2023-06-07 04:18
georgian.elc	1.09 KB	-rw-r--r--	2023-06-07 04:19
greek.elc	1.55 KB	-rw-r--r--	2023-06-07 04:18
hanja-util.elc	403.94 KB	-rw-r--r--	2023-06-07 04:04
hebrew.elc	4.86 KB	-rw-r--r--	2023-06-07 04:18
ind-util.elc	42.58 KB	-rw-r--r--	2023-06-07 04:04
indian.elc	8.38 KB	-rw-r--r--	2023-06-07 04:18
japan-util.elc	10.85 KB	-rw-r--r--	2023-06-07 04:04
japanese.elc	7.61 KB	-rw-r--r--	2023-06-07 04:19
khmer.elc	972 B	-rw-r--r--	2023-06-07 04:19
korea-util.elc	3.72 KB	-rw-r--r--	2023-06-07 04:04
korean.elc	2.24 KB	-rw-r--r--	2023-06-07 04:18
lao-util.elc	12.34 KB	-rw-r--r--	2023-06-07 04:04
lao.elc	1.73 KB	-rw-r--r--	2023-06-07 04:19
misc-lang.elc	1.88 KB	-rw-r--r--	2023-06-07 04:19
romanian.elc	1.33 KB	-rw-r--r--	2023-06-07 04:18
sinhala.elc	997 B	-rw-r--r--	2023-06-07 04:18
slovak.elc	1.05 KB	-rw-r--r--	2023-06-07 04:18
tai-viet.elc	1.69 KB	-rw-r--r--	2023-06-07 04:19
thai-util.elc	9.11 KB	-rw-r--r--	2023-06-07 04:04
thai-word.elc	198.81 KB	-rw-r--r--	2023-06-07 04:04
thai.elc	2.07 KB	-rw-r--r--	2023-06-07 04:19
tibet-util.elc	8.12 KB	-rw-r--r--	2023-06-07 04:04
tibetan.elc	10.1 KB	-rw-r--r--	2023-06-07 04:19
tv-util.elc	2.81 KB	-rw-r--r--	2023-06-07 04:04
utf-8-lang.elc	876 B	-rw-r--r--	2023-06-07 04:19
viet-util.elc	4.54 KB	-rw-r--r--	2023-06-07 04:04
vietnamese.elc	2.45 KB	-rw-r--r--	2023-06-07 04:19

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:04:33 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/language/korea-util.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

#@75 The kind of Korean keyboard for Korean input method.
"" for 2, "3" for 3.
(defvar default-korean-keyboard (byte-code "\300\301\302\303\304!\206\n�\305\"\203�\302\202�\305!\207" [purecopy string-match "3" getenv "HANGUL_KEYBOARD_TYPE" ""] 5) (#$ . 558))
#@67 Turn on or off a Korean text input method for the current buffer.
(defalias 'toggle-korean-input-method #[nil "\203�\302 \207\303\304	P!\207" [current-input-method default-korean-keyboard deactivate-input-method activate-input-method "korean-hangul"] 3 (#$ . 819) nil])
#@38 Swith to/from Korean symbol package.
(defalias 'quail-hangul-switch-symbol-ksc #[(&rest ignore) "\205�\302\230\203�\303\304	P!\207\303\302!\207" [current-input-method default-korean-keyboard "korean-symbol" activate-input-method "korean-hangul"] 3 (#$ . 1097) "i"])
#@37 Swith to/from Korean hanja package.
(defalias 'quail-hangul-switch-hanja #[(&rest ignore) "\205�\302\303\"\203�\304\305	P!\207\304\303	P!\207" [current-input-method default-korean-keyboard string-match "korean-hanja" activate-input-method "korean-hangul"] 3 (#$ . 1373) "i"])
(defalias 'isearch-toggle-korean-input-method #[nil "\304\305 \210)	\306\304\307 \207" [overriding-terminal-local-map input-method-function isearch-input-method-function isearch-input-method-local-p nil toggle-korean-input-method t isearch-update] 1 nil nil])
(defalias 'isearch-hangul-switch-symbol-ksc #[nil "\304\305 \210)	\306\304\307 \207" [overriding-terminal-local-map input-method-function isearch-input-method-function isearch-input-method-local-p nil quail-hangul-switch-symbol-ksc t isearch-update] 1 nil nil])
(defalias 'isearch-hangul-switch-hanja #[nil "\304\305 \210)	\306\304\307 \207" [overriding-terminal-local-map input-method-function isearch-input-method-function isearch-input-method-local-p nil quail-hangul-switch-hanja t isearch-update] 1 nil nil])
(defvar korean-key-bindings (byte-code "\301\302\303\304\305\306B\307B\310B\311B\257	\207" [isearch-mode-map (global [33554464] toggle-korean-input-method nil) (global [Hangul] toggle-korean-input-method nil) (global [C-f9] quail-hangul-switch-symbol-ksc nil) (global [f9] hangul-to-hanja-conversion nil) (global [Hangul_Hanja] hangul-to-hanja-conversion nil) ([33554464] isearch-toggle-korean-input-method nil) ([Hangul] isearch-toggle-korean-input-method nil) ([C-f9] isearch-hangul-switch-symbol-ksc nil) ([f9] isearch-hangul-switch-hanja nil)] 10))
(defalias 'setup-korean-environment-internal #[nil "\306\307!\210\211\205F�	@\211A@\310\n8\311\n@\312=\203*�\313!\314\f\"\210\2027�\315\n@\"\316\n@\f#\210\317\n\233
\240\210,	A\211\204\n�\311)\207" [korean-key-bindings key-bindings this key new-def old-def use-cjk-char-width-table ko_KR 2 nil global global-key-binding global-set-key lookup-key define-key 3] 5])
#@35 Exit Korean language environment.
(defalias 'exit-korean-environment #[nil "\306 \210\211\205I�	@\211A@\307\n8\310\n8\n@\311=\203/�\312!\f=\203@�\313
\"\210\202@�\314\n@\"\f=\203@�\315\n@
#\210,	A\211\204	�\316)\207" [korean-key-bindings key-bindings this key new-def old-def use-default-char-width-table 2 3 global global-key-binding global-set-key lookup-key define-key nil] 5 (#$ . 3379)])
(provide 'korea-util)