;ELC
;;; compiled by nk@localhost.localdomain on Fri Dec 1 22:48:55 2006
;;; from file /home/nk/pkg-build/test/mule-packages/mule-base/auto-autoloads.el
;;; emacs version 21.4 (patch 19) "Constant Variable" XEmacs Lucid.
;;; bytecomp version 2.27 XEmacs; 2000-09-12.
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 19.
(if (and (boundp 'emacs-version)
(or (and (boundp 'epoch::version) epoch::version)
(string-lessp emacs-version "20")))
(error "`auto-autoloads.el' was compiled for Emacs 20"))
(or (boundp 'current-load-list) (setq current-load-list nil))
(byte-code "!!&" [featurep mule-base-autoloads error "Already loaded" package-provide mule-base :version 1.49 :author-version "No-Upstream-Ver" :type regular] 8)
#@37 Display character table of CHARSET.
(autoload 'view-charset "char-table" '(#$ . 793) t nil)
#@52 Display character table of CHARSET by pop-up menu.
(autoload 'view-charset-by-menu "chartblxmas" '(#$ . 891) t nil)
(byte-code "É%" [autoload setup-chinese-gb-environment-internal "china-util" nil] 6)
#@65 Setup multilingual environment (MULE) for Chinese GB2312 users.
(autoload 'setup-chinese-gb-environment "china-util" '(#$ . 1104) t nil)
#@63 Setup multilingual environment (MULE) for Chinese Big5 users.
(autoload 'setup-chinese-big5-environment "china-util" '(#$ . 1247) t nil)
#@87 Decode HZ/ZW encoded text in the current region.
Return the length of resulting text.
(autoload 'decode-hz-region "china-util" '(#$ . 1390) t nil)
#@50 Decode HZ/ZW encoded text in the current buffer.
(autoload 'decode-hz-buffer "china-util" '(#$ . 1543) t nil)
#@83 Encode the text in the current region to HZ.
Return the length of resulting text.
(autoload 'encode-hz-region "china-util" '(#$ . 1659) t nil)
#@46 Encode the text in the current buffer to HZ.
(autoload 'encode-hz-buffer "china-util" '(#$ . 1808) t nil)
#@70 Setup multilingual environment (MULE) for Cyrillic ISO-8859-5 users.
(autoload 'setup-cyrillic-iso-environment "cyril-util" '(#$ . 1920) t nil)
#@64 Setup multilingual environment (MULE) for Cyrillic KOI8 users.
(autoload 'setup-cyrillic-koi8-environment "cyril-util" '(#$ . 2070) t nil)
#@73 Setup multilingual environment (MULE) for Cyrillic ALTERNATIVNYJ users.
(autoload 'setup-cyrillic-alternativnyj-environment "cyril-util" '(#$ . 2215) t nil)
#@63 Return KOI8-R external character code of CHAR if appropriate.
(autoload 'cyrillic-encode-koi8-r-char "cyril-util" '(#$ . 2378) nil nil)
#@70 Return ALTERNATIVNYJ external character code of CHAR if appropriate.
(autoload 'cyrillic-encode-alternativnyj-char "cyril-util" '(#$ . 2520) nil nil)
#@486 Display a cyrillic buffer using a transliteration.
For readability, the table is slightly
different from the one used for the input method `cyrillic-translit'.
The argument is a string which specifies which language you are using;
that affects the choice of transliterations slightly.
Possible values are listed in 'cyrillic-language-alist'.
If the argument is t, we use the default cyrillic transliteration.
If the argument is nil, we return the display table to its standard state.
(autoload 'standard-display-cyrillic-translit "cyril-util" '(#$ . 2677) t nil)
#@46 Setup multilingual environment for Ethiopic.
(autoload 'setup-ethiopic-environment "ethio-util" '(#$ . 3247) nil nil)
(byte-code "É%" [autoload setup-ethiopic-environment-internal "ethio-util" nil] 6)
#@541 Convert the characters in region from SERA to FIDEL.
The variable `ethio-primary-language' specifies the primary language
and `ethio-secondary-language' specifies the secondary.
If the 3rd parameter SECONDARY is given and non-nil, assume the region
begins begins with the secondary language; otherwise with the primary
language.
If the 4th parameter FORCE is given and non-nil, perform conversion
even if the buffer is read-only.
See also the descriptions of the variables
`ethio-use-colon-for-colon' and
`ethio-use-three-dot-question'.
(autoload 'ethio-sera-to-fidel-region "ethio-util" '(#$ . 3461) t nil)
#@526 Convert the current buffer from SERA to FIDEL.
The variable `ethio-primary-language' specifies the primary
language and `ethio-secondary-language' specifies the secondary.
If the 1st optional parameter SECONDARY is non-nil, assume the buffer
begins with the secondary language; otherwise with the primary
language.
If the 2nd optional parametr FORCE is non-nil, perform conversion even if the
buffer is read-only.
See also the descriptions of the variables
`ethio-use-colon-for-colon' and
`ethio-use-three-dot-question'.
(autoload 'ethio-sera-to-fidel-buffer "ethio-util" '(#$ . 4079) t nil)
#@173 Execute ethio-sera-to-fidel-mail or ethio-sera-to-fidel-marker depending on the current major mode.
If in rmail-mode or in mail-mode, execute the former; otherwise latter.
(autoload 'ethio-sera-to-fidel-mail-or-marker "ethio-util" '(#$ . 4682) t nil)
#@294 Convert SERA to FIDEL to read/write mail and news.
If the buffer contains the markers "" and "",
convert the segments between them into FIDEL.
If invoked interactively and there is no marker, convert the subject field
and the body into FIDEL using `ethio-sera-to-fidel-region'.
(autoload 'ethio-sera-to-fidel-mail "ethio-util" '(#$ . 4940) t nil)
#@203 Convert the regions surrounded by "" and "" from SERA to FIDEL.
Assume that each region begins with `ethio-primary-language'.
The markers "" and "" themselves are not deleted.
(autoload 'ethio-sera-to-fidel-marker "ethio-util" '(#$ . 5309) t nil)
#@609 Replace all the FIDEL characters in the region to the SERA format.
The variable `ethio-primary-language' specifies the primary
language and `ethio-secondary-language' specifies the secondary.
If the 3dr parameter SECONDARY is given and non-nil, try to convert
the region so that it begins in the secondary language; otherwise with
the primary language.
If the 4th parameter FORCE is given and non-nil, convert even if the
buffer is read-only.
See also the descriptions of the variables
`ethio-use-colon-for-colon', `ethio-use-three-dot-question',
`ethio-quote-vowel-always' and `ethio-numeric-reduction'.
(autoload 'ethio-fidel-to-sera-region "ethio-util" '(#$ . 5589) t nil)
#@615 Replace all the FIDEL characters in the current buffer to the SERA format.
The variable `ethio-primary-language' specifies the primary
language and `ethio-secondary-language' specifies the secondary.
If the 1st optional parameter SECONDARY is non-nil, try to convert the
region so that it begins in the secondary language; otherwise with the
primary language.
If the 2nd optional parameter FORCE is non-nil, convert even if the
buffer is read-only.
See also the descriptions of the variables
`ethio-use-colon-for-colon', `ethio-use-three-dot-question',
`ethio-quote-vowel-always' and `ethio-numeric-reduction'.
(autoload 'ethio-fidel-to-sera-buffer "ethio-util" '(#$ . 6275) t nil)
#@173 Execute ethio-fidel-to-sera-mail or ethio-fidel-to-sera-marker depending on the current major mode.
If in rmail-mode or in mail-mode, execute the former; otherwise latter.
(autoload 'ethio-fidel-to-sera-mail-or-marker "ethio-util" '(#$ . 6967) t nil)
#@309 Convert FIDEL to SERA to read/write mail and news.
If the body contains at least one Ethiopic character,
1) insert the string "" at the beginning of the body,
2) insert "" at the end of the body, and
3) convert the body into SERA.
The very same procedure applies to the subject field, too.
(autoload 'ethio-fidel-to-sera-mail "ethio-util" '(#$ . 7225) t nil)
#@141 Convert the regions surrounded by "" and "" from FIDEL to SERA.
The markers "" and "" themselves are not deleted.
(autoload 'ethio-fidel-to-sera-marker "ethio-util" '(#$ . 7609) t nil)
#@57 Modify the vowel of the FIDEL that is under the cursor.
(autoload 'ethio-modify-vowel "ethio-util" '(#$ . 7826) t nil)
#@443 Replace ASCII spaces with Ethiopic word separators in the region.
In the specified region, replace word separators surrounded by two
Ethiopic characters, depending on the first parameter CH, which should
be 1, 2, or 3.
If CH = 1, word separator will be replaced with an ASCII space.
If CH = 2, with two ASCII spaces.
If CH = 3, with the Ethiopic colon-like word separator.
The second and third parameters BEGIN and END specify the region.
(autoload 'ethio-replace-space "ethio-util" '(#$ . 7952) t nil)
#@45 Allow the user to input special characters.
(autoload 'ethio-input-special-character "ethio-util" '(#$ . 8464) t nil)
#@124 Convert each fidel characters in the current buffer into a fidel-tex command.
Each command is always surrounded by braces.
(autoload 'ethio-fidel-to-tex-buffer "ethio-util" '(#$ . 8589) t nil)
#@68 Convert fidel-tex commands in the current buffer into fidel chars.
(autoload 'ethio-tex-to-fidel-buffer "ethio-util" '(#$ . 8788) t nil)
#@246 Convert Ethiopic characters into the Java escape sequences.
Each escape sequence is of the form \uXXXX, where XXXX is the
character's codepoint (in hex) in Unicode.
If `ethio-java-save-lowercase' is non-nil, use [0-9a-f].
Otherwise, [0-9A-F].
(autoload 'ethio-fidel-to-java-buffer "ethio-util" '(#$ . 8932) nil nil)
#@75 Convert the Java escape sequences into corresponding Ethiopic characters.
(autoload 'ethio-java-to-fidel-buffer "ethio-util" '(#$ . 9256) nil nil)
#@68 Transcribe file content into Ethiopic dependig on filename suffix.
(autoload 'ethio-find-file "ethio-util" '(#$ . 9409) nil nil)
#@74 Transcribe Ethiopic characters in ASCII depending on the file extension.
(autoload 'ethio-write-file "ethio-util" '(#$ . 9544) nil nil)
(byte-code "B!\"" [current-load-list search-string-char-prompt default-boundp set-default "*Enter string... "] 3)
#@53 Read string from minibuffer for incremental search.
(autoload 'isearch-fep-string "isearch-mule" '(#$ . 9813) t nil)
#@50 Read string for incremental search by using egg.
(autoload 'isearch-fep-egg "isearch-mule" '(#$ . 9936) t nil)
#@52 Read string for incremental search by using canna.
(autoload 'isearch-fep-canna "isearch-mule" '(#$ . 10053) t nil)
#@52 Read string for incremental search by using quail.
(autoload 'isearch-fep-quail "isearch-mule" '(#$ . 10175) t nil)
#@53 Setup multilingual environment (MULE) for Japanese.
(autoload 'setup-japanese-environment "japan-util" '(#$ . 10297) t nil)
(byte-code "É%" [autoload setup-japanese-environment-internal "japan-util" nil] 6)
#@395 Convert argument to Katakana and return that.
The argument may be a character or string. The result has the same type.
The argument object is not altered--the value is a copy.
Optional argument HANKAKU t means to convert to `hankaku' Katakana
(`japanese-jisx0201-kana'), in which case return value
may be a string even if OBJ is a character if two Katakanas are
necessary to represent OBJ.
(autoload 'japanese-katakana "japan-util" '(#$ . 10517) nil nil)
#@178 Convert argument to Hiragana and return that.
The argument may be a character or string. The result has the same type.
The argument object is not altered--the value is a copy.
(autoload 'japanese-hiragana "japan-util" '(#$ . 10983) nil nil)
#@254 Convert argument to `hankaku' and return that.
The argument may be a character or string. The result has the same type.
The argument object is not altered--the value is a copy.
Optional argument ASCII-ONLY non-nil means to return only ASCII character.
(autoload 'japanese-hankaku "japan-util" '(#$ . 11232) nil nil)
#@179 Convert argument to `zenkaku' and return that.
The argument may be a character or string. The result has the same type.
The argument object is not altered--the value is a copy.
(autoload 'japanese-zenkaku "japan-util" '(#$ . 11556) nil nil)
#@193 Convert Japanese `hiragana' chars in the region to `katakana' chars.
Optional argument HANKAKU t means to convert to `hankaku katakana' character
of which charset is `japanese-jisx0201-kana'.
(autoload 'japanese-katakana-region "japan-util" '(#$ . 11805) t nil)
#@70 Convert Japanese `katakana' chars in the region to `hiragana' chars.
(autoload 'japanese-hiragana-region "japan-util" '(#$ . 12073) t nil)
#@251 Convert Japanese `zenkaku' chars in the region to `hankaku' chars.
`Zenkaku' chars belong to `japanese-jisx0208'
`Hankaku' chars belong to `ascii' or `japanese-jisx0201-kana'.
Optional argument ASCII-ONLY non-nil means to convert only to ASCII char.
(autoload 'japanese-hankaku-region "japan-util" '(#$ . 12219) t nil)
#@253 Convert hankaku' chars in the region to Japanese `zenkaku' chars.
`Zenkaku' chars belong to `japanese-jisx0208'
`Hankaku' chars belong to `ascii' or `japanese-jisx0201-kana'.
Optional argument KATAKANA-ONLY non-nil means to convert only KATAKANA char.
(autoload 'japanese-zenkaku-region "japan-util" '(#$ . 12545) t nil)
#@150 Read a Hiragana string from the minibuffer, prompting with string PROMPT.
If non-nil, second arg INITIAL-INPUT is a string to insert before reading.
(autoload 'read-hiragana-string "japan-util" '(#$ . 12873) nil nil)
(byte-code "É%" [autoload kana-keyboard-define-keys "kana-keyboard" nil] 6)
#@76 *The kind of Korean keyboard for Korean input method.
"" for 2, "3" for 3.
(defvar default-korean-keyboard "" (#$ . -13178))
#@51 Setup multilingual environment (MULE) for Korean.
(autoload 'setup-korean-environment "korea-util" '(#$ . 13309) t nil)
(byte-code "É%" [autoload setup-korean-environment-internal "korea-util" nil] 6)
#@416 Display a list of all character sets.
The ID column contains a charset identification number for internal use.
The B column contains a number of bytes occupied in a buffer
by any character in this character set.
The W column contains a number of columns occupied on the screen
by any character in this character set.
With prefix arg, the output format gets more cryptic,
but still shows the full information.
(autoload 'list-character-sets "mule-diag" '(#$ . 13523) t nil)
#@42 Display information about CODING-SYSTEM.
(autoload 'describe-coding-system "mule-diag" '(#$ . 14008) t nil)
#@583 Display coding systems currently used in a brief format in echo area.
The format is "F[..],K[..],T[..], default F[..]",
where mnemonics of the following coding systems come in this order
at the place of `..':
`buffer-file-coding-system` (of the current buffer)
eol-type of buffer-file-coding-system (of the current buffer)
Value returned by `keyboard-coding-system'
eol-type of (keyboard-coding-system)
Value returned by `terminal-coding-system.
eol-type of (terminal-coding-system)
`default-buffer-file-coding-system'
eol-type of default-buffer-file-coding-system
(autoload 'describe-current-coding-system-briefly "mule-diag" '(#$ . 14123) t nil)
#@51 Display coding systems currently used, in detail.
(autoload 'describe-current-coding-system "mule-diag" '(#$ . 14794) t nil)
#@233 Display a list of all coding systems.
This shows the mnemonic letter, name, and description of each coding system.
With prefix arg, the output format gets more cryptic,
but still contains full information about each coding system.
(autoload 'list-coding-systems "mule-diag" '(#$ . 14926) t nil)
#@42 Display a list of all coding categories.
(autoload 'list-coding-categories "mule-diag" '(#$ . 15228) t nil)
#@65 Display information about fonts which partially match FONTNAME.
(autoload 'describe-font "mule-diag" '(#$ . 15342) t nil)
#@619 Display information of FONTSET.
This shows the name, size, and style of FONTSET, and the list of fonts
contained in FONTSET.
The column WDxHT contains width and height (pixels) of each fontset
(i.e. those of ASCII font in the fontset). The letter `-' in this
column means that the corresponding fontset is not yet used in any
frame.
The O column for each font contains one of the following letters:
o -- font already opened
- -- font not yet opened
x -- font can't be opened
? -- no font specified
The Charset column for each font contains a name of character set
displayed (for this fontset) using that font.
(autoload 'describe-fontset "mule-diag" '(#$ . 15471) t nil)
#@218 Display a list of all fontsets.
This shows the name, size, and style of each fontset.
With prefix arg, it also list the fonts contained in each fontset;
see the function `describe-fontset' for the format of the list.
(autoload 'list-fontsets "mule-diag" '(#$ . 16157) t nil)
#@46 Display information about all input methods.
(autoload 'list-input-methods "mule-diag" '(#$ . 16438) t nil)
#@284 Display diagnosis of the multilingual environment (Mule).
This shows various information related to the current multilingual
environment, including lists of input methods, coding systems,
character sets, and fontsets (if Emacs is running under a window
system which uses fontsets).
(autoload 'mule-diag "mule-diag" '(#$ . 16553) t nil)
#@116 Dump information about all charsets into the file `CHARSETS'.
The file is saved in the directory `data-directory'.
(autoload 'dump-charsets "mule-diag" '(#$ . 16897) nil nil)
#@121 Dump information about all coding systems into the file `CODINGS'.
The file is saved in the directory `data-directory'.
(autoload 'dump-codings "mule-diag" '(#$ . 17079) nil nil)
#@80 If non-nil, "ESC , Fe" and "ESC - Fe" are used for inputting
Latin characters.
(defvar keyboard-allow-latin-input nil (#$ . 17264))
#@74 Set variable keyboard-coding-system to CODESYS and modify keymap for it.
(autoload 'set-keyboard-coding-system "mule-keyboard" '(#$ . 17402) t nil)
(byte-code "É%É%É%" [autoload regexp-compile "mule-trex" nil regexp-word-compile define-word-regexp macro] 6)
#@57 Embed OBJ (string or character) at index IDX of STRING.
(autoload 'store-substring "mule-util" '(#$ . 17684) nil nil)
#@657 Truncate string STR to end at column END-COLUMN.
The optional 2nd arg START-COLUMN, if non-nil, specifies
the starting column; that means to return the characters occupying
columns START-COLUMN ... END-COLUMN of STR.
The optional 3rd arg PADDING, if non-nil, specifies a padding character
to add at the end of the result if STR doesn't reach column END-COLUMN,
or if END-COLUMN comes in the middle of a character in STR.
PADDING is also added at the beginning of the result
if column START-COLUMN appears in the middle of a character in STR.
If PADDING is nil, no padding is added in these cases, so
the resulting string may be narrower than END-COLUMN.
(autoload 'truncate-string-to-width "mule-util" '(#$ . 17809) nil nil)
(defalias 'truncate-string 'truncate-string-to-width)
#@380 Return t if OBJ is a nested alist.
Nested alist is a list of the form (ENTRY . BRANCHES), where ENTRY is
any Lisp object, and BRANCHES is a list of cons cells of the form
(KEY-ELEMENT . NESTED-ALIST).
You can use a nested alist to store any Lisp object (ENTRY) for a key
sequence KEYSEQ, where KEYSEQ is a sequence of KEY-ELEMENT. KEYSEQ
can be a string, a vector, or a list.
(autoload 'nested-alist-p "mule-util" '(#$ . 18597) nil nil)
#@273 Set ENTRY for KEYSEQ in a nested alist ALIST.
Optional 4th arg LEN non-nil means the first LEN elements in KEYSEQ
is considered.
Optional argument BRANCHES if non-nil is branches for a keyseq
longer than KEYSEQ.
See the documentation of `nested-alist-p' for more detail.
(autoload 'set-nested-alist "mule-util" '(#$ . 19044) nil nil)
#@532 Look up key sequence KEYSEQ in nested alist ALIST. Return the definition.
Optional 1st argument LEN specifies the length of KEYSEQ.
Optional 2nd argument START specifies index of the starting key.
The returned value is normally a nested alist of which
car part is the entry for KEYSEQ.
If ALIST is not deep enough for KEYSEQ, return number which is
how many key elements at the front of KEYSEQ it takes
to reach a leaf in ALIST.
Optional 3rd argument NIL-FOR-TOO-LONG non-nil means return nil
even if ALIST is not deep enough.
(autoload 'lookup-nested-alist "mule-util" '(#$ . 19386) nil nil)
(byte-code " \" \"*" [oldfun newfun set-coding-system-alist modify-coding-system-alist define-function make-obsolete] 3)
#@67 Return the string indicating end-of-line format of CODING-SYSTEM.
(autoload 'coding-system-eol-type-mnemonic "mule-util" '(#$ . 20122) nil nil)
#@180 Detect a coding system of the text between FROM and TO with PRIORITY-LIST.
PRIORITY-LIST is an alist of coding categories vs the corresponding
coding systems ordered by priority.
(defalias 'detect-coding-with-priority #[(from to priority-list) " \n\"Ɏʉ@@s
@
A\"
@BAe!\"." [priority-list orig-category-systems orig-category-list prio-list categories x coding-priority-list mapcar coding-category-system ((byte-code " ! @@\" AAn" [orig-category-systems orig-category-list set-coding-priority-list set-coding-category-system] 3)) nil set-coding-category-system set-coding-priority-list detect-coding-region from to] 4 (#$ . 20273)])
(byte-code "Ns\"#" [detect-coding-with-priority byte-optimizer (nil byte-compile-inline-expand) error "%s already has a byte-optimizer, can't make it inline" put byte-compile-inline-expand] 4)
#@172 Detect a coding system of the text between FROM and TO with LANG-ENV.
The detection takes into account the coding system priorities for the
language environment LANG-ENV.
(autoload 'detect-coding-with-language-environment "mule-util" '(#$ . 21170) nil nil)
(byte-code "B!!ƪ!\"" [current-load-list thai-xtis-generic-char default-boundp set-default featurep xemacs thai-xtis make-char] 4)
#@243 Minor mode for Thai text that pays attention to word segmentation.
In this mode, word-oriented commands (e.g forward-word) and text
filling commands (e.g. fill-paragraph) recognize Thai word boundaries
within a sequence of Thai characters.
(autoload 'thai-xtis-text-mode "thai-xtis-util" '(#$ . 21584) t nil)
#@54 Return VISCII character code of CHAR if appropriate.
(autoload 'viet-encode-viscii-char "viet-util" '(#$ . 21901) nil nil)
#@68 Setup multilingual environment (MULE) for Vietnamese VISCII users.
(autoload 'setup-vietnamese-environment "viet-util" '(#$ . 22030) t nil)
#@195 Convert `VIQR' mnemonics of the current region to Vietnamese characters.
When called from a program, expects two arguments,
positions (integers or markers) specifying the stretch of the region.
(autoload 'viet-decode-viqr-region "viet-util" '(#$ . 22177) t nil)
#@74 Convert `VIQR' mnemonics of the current buffer to Vietnamese characters.
(autoload 'viet-decode-viqr-buffer "viet-util" '(#$ . 22445) t nil)
#@195 Convert Vietnamese characters of the current region to `VIQR' mnemonics.
When called from a program, expects two arguments,
positions (integers or markers) specifying the stretch of the region.
(autoload 'viet-encode-viqr-region "viet-util" '(#$ . 22593) t nil)
#@74 Convert Vietnamese characters of the current buffer to `VIQR' mnemonics.
(autoload 'viet-encode-viqr-buffer "viet-util" '(#$ . 22861) t nil)
(byte-code "É%É%!" [autoload viqr-post-read-conversion "viet-util" nil viqr-pre-write-conversion provide mule-base-autoloads] 6)