|
165
|
1 ;;; DO NOT MODIFY THIS FILE
|
|
|
2 (if (not (featurep 'mule-autoloads))
|
|
|
3 (progn
|
|
|
4
|
|
|
5 ;;;### (autoloads (isearch-fep-quail isearch-fep-canna isearch-fep-egg isearch-fep-string) "isearch-mule" "mule/isearch-mule.el")
|
|
|
6
|
|
|
7 (defvar search-string-char-prompt "*Enter string... ")
|
|
|
8
|
|
|
9 (autoload 'isearch-fep-string "isearch-mule" "\
|
|
|
10 Read string from minibuffer for incremental search." t nil)
|
|
|
11
|
|
|
12 (autoload 'isearch-fep-egg "isearch-mule" "\
|
|
|
13 Read string for incremental search by using egg." t nil)
|
|
|
14
|
|
|
15 (autoload 'isearch-fep-canna "isearch-mule" "\
|
|
|
16 Read string for incremental search by using canna." t nil)
|
|
|
17
|
|
|
18 (autoload 'isearch-fep-quail "isearch-mule" "\
|
|
|
19 Read string for incremental search by using quail." t nil)
|
|
|
20
|
|
|
21 ;;;***
|
|
|
22
|
|
|
23 ;;;### (autoloads (define-ccl-program ccl-dump ccl-compile ccl-program-p) "mule-ccl" "mule/mule-ccl.el")
|
|
|
24
|
|
|
25 (autoload 'ccl-program-p "mule-ccl" "\
|
|
|
26 T if OBJECT is a valid CCL compiled code." nil nil)
|
|
|
27
|
|
|
28 (autoload 'ccl-compile "mule-ccl" "\
|
|
|
29 Compile a CCL source program and return the compiled equivalent.
|
|
|
30 The return value will be a vector of integers." nil nil)
|
|
|
31
|
|
|
32 (autoload 'ccl-dump "mule-ccl" "\
|
|
|
33 Disassemble compiled CCL-CODE." nil nil)
|
|
|
34
|
|
|
35 (autoload 'define-ccl-program "mule-ccl" "\
|
|
|
36 Does (defconst NAME (ccl-compile (eval CCL-PROGRAM)) DOC).
|
|
|
37 Byte-compiler expand this macro while compiling." nil 'macro)
|
|
|
38
|
|
|
39 ;;;***
|
|
|
40
|
|
|
41 ;;;### (autoloads (dump-coding-systems dump-charsets mule-diag list-fontset describe-fontset list-font describe-font list-coding-system list-coding-system-briefly describe-coding-system list-charsets) "mule-debug" "mule/mule-debug.el")
|
|
|
42
|
|
|
43 (autoload 'list-charsets "mule-debug" "\
|
|
|
44 Display a list of existing character sets." t nil)
|
|
|
45
|
|
|
46 (autoload 'describe-coding-system "mule-debug" "\
|
|
|
47 Display documentation of the coding-system CS." t nil)
|
|
|
48
|
|
|
49 (autoload 'list-coding-system-briefly "mule-debug" "\
|
|
|
50 Display coding-systems currently used with a brief format in mini-buffer." t nil)
|
|
|
51
|
|
|
52 (autoload 'list-coding-system "mule-debug" "\
|
|
|
53 Describe coding-systems currently used with a detailed format.
|
|
|
54 If optional arg ALL is non-nil, all coding-systems are listed in
|
|
|
55 machine readable simple format." t nil)
|
|
|
56
|
|
|
57 (autoload 'describe-font "mule-debug" "\
|
|
|
58 Display information about fonts which partially match FONTNAME." t nil)
|
|
|
59
|
|
|
60 (autoload 'list-font "mule-debug" "\
|
|
|
61 Display a list of fonts." t nil)
|
|
|
62
|
|
|
63 (autoload 'describe-fontset "mule-debug" "\
|
|
|
64 Display information about FONTSET." t nil)
|
|
|
65
|
|
|
66 (autoload 'list-fontset "mule-debug" "\
|
|
|
67 Display a list of fontsets." t nil)
|
|
|
68
|
|
|
69 (autoload 'mule-diag "mule-debug" "\
|
|
|
70 Show diagnosis of the current running Mule." t nil)
|
|
|
71
|
|
|
72 (autoload 'dump-charsets "mule-debug" nil nil nil)
|
|
|
73
|
|
|
74 (autoload 'dump-coding-systems "mule-debug" nil nil nil)
|
|
|
75
|
|
|
76 ;;;***
|
|
|
77
|
|
|
78 ;;;### (autoloads (set-keyboard-coding-system) "mule-keyboard" "mule/mule-keyboard.el")
|
|
|
79
|
|
|
80 (defvar keyboard-allow-latin-input nil "\
|
|
|
81 If non-nil, \"ESC , Fe\" and \"ESC - Fe\" are used for inputting
|
|
|
82 Latin characters.")
|
|
|
83
|
|
|
84 (autoload 'set-keyboard-coding-system "mule-keyboard" "\
|
|
|
85 Set variable keyboard-coding-system to CODESYS and modify keymap for it." t nil)
|
|
|
86
|
|
|
87 ;;;***
|
|
|
88
|
|
|
89 ;;;### (autoloads (define-word-regexp regexp-word-compile regexp-compile) "mule-trex" "mule/mule-trex.el")
|
|
|
90
|
|
|
91 (autoload 'regexp-compile "mule-trex" nil nil nil)
|
|
|
92
|
|
|
93 (autoload 'regexp-word-compile "mule-trex" nil nil nil)
|
|
|
94
|
|
|
95 (autoload 'define-word-regexp "mule-trex" nil nil 'macro)
|
|
|
96
|
|
|
97 ;;;***
|
|
|
98
|
|
167
|
99 ;;;### (autoloads (decompose-composite-char compose-chars decompose-region compose-region set-coding-system-alist lookup-nested-alist set-nested-alist nested-alist-p truncate-string-to-width store-substring string-to-vector string-to-list string-to-sequence) "mule-util" "mule/mule-util.el")
|
|
165
|
100
|
|
167
|
101 (autoload 'string-to-sequence "mule-util" "\
|
|
|
102 Convert STRING to a sequence of TYPE which contains characters in STRING.
|
|
|
103 TYPE should be `list' or `vector'.
|
|
|
104 Multibyte characters are concerned." nil nil)
|
|
165
|
105
|
|
167
|
106 (autoload 'string-to-list "mule-util" "\
|
|
|
107 Return a list of characters in STRING." nil nil)
|
|
|
108
|
|
|
109 (autoload 'string-to-vector "mule-util" "\
|
|
|
110 Return a vector of characters in STRING." nil nil)
|
|
165
|
111
|
|
|
112 (autoload 'store-substring "mule-util" "\
|
|
|
113 Embed OBJ (string or character) at index IDX of STRING." nil nil)
|
|
|
114
|
|
|
115 (autoload 'truncate-string-to-width "mule-util" "\
|
|
|
116 Truncate string STR to fit in WIDTH columns.
|
|
|
117 Optional 1st arg START-COLUMN if non-nil specifies the starting column.
|
|
|
118 Optional 2nd arg PADDING if non-nil is a padding character to be padded at
|
|
|
119 the head and tail of the resulting string to fit in WIDTH if necessary.
|
|
|
120 If PADDING is nil, the resulting string may be narrower than WIDTH." nil nil)
|
|
|
121
|
|
|
122 (defalias 'truncate-string 'truncate-string-to-width)
|
|
|
123
|
|
167
|
124 (autoload 'nested-alist-p "mule-util" "\
|
|
|
125 Return t if OBJ is a nesetd alist.
|
|
|
126
|
|
|
127 Nested alist is a list of the form (ENTRY . BRANCHES), where ENTRY is
|
|
|
128 any Lisp object, and BRANCHES is a list of cons cells of the form
|
|
|
129 \(KEY-ELEMENT . NESTED-ALIST).
|
|
|
130
|
|
|
131 You can use a nested alist to store any Lisp object (ENTRY) for a key
|
|
|
132 sequence KEYSEQ, where KEYSEQ is a sequence of KEY-ELEMENT. KEYSEQ
|
|
|
133 can be a string, a vector, or a list." nil nil)
|
|
165
|
134
|
|
|
135 (autoload 'set-nested-alist "mule-util" "\
|
|
|
136 Set ENTRY for KEYSEQ in a nested alist ALIST.
|
|
|
137 Optional 4th arg LEN non-nil means the firlst LEN elements in KEYSEQ
|
|
|
138 is considered.
|
|
|
139 Optional argument BRANCHES if non-nil is branches for a keyseq
|
|
|
140 longer than KEYSEQ.
|
|
|
141 See the documentation of `nested-alist-p' for more detail." nil nil)
|
|
|
142
|
|
|
143 (autoload 'lookup-nested-alist "mule-util" "\
|
|
|
144 Look up key sequence KEYSEQ in nested alist ALIST. Return the definition.
|
|
|
145 Optional 1st argument LEN specifies the length of KEYSEQ.
|
|
|
146 Optional 2nd argument START specifies index of the starting key.
|
|
|
147 The returned value is normally a nested alist of which
|
|
|
148 car part is the entry for KEYSEQ.
|
|
|
149 If ALIST is not deep enough for KEYSEQ, return number which is
|
|
|
150 how many key elements at the front of KEYSEQ it takes
|
|
|
151 to reach a leaf in ALIST.
|
|
|
152 Optional 3rd argument NIL-FOR-TOO-LONG non-nil means return nil
|
|
|
153 even if ALIST is not deep enough." nil nil)
|
|
|
154
|
|
|
155 (autoload 'set-coding-system-alist "mule-util" "\
|
|
|
156 Update `coding-system-alist' according to the arguments.
|
|
|
157 TARGET-TYPE specifies a type of the target: `file', `process', or `network'.
|
|
|
158 TARGET-TYPE tells which slots of coding-system-alist should be affected.
|
|
|
159 If `file', it affects slots for insert-file-contents and write-region.
|
|
|
160 If `process', it affects slots for call-process, call-process-region, and
|
|
|
161 start-process.
|
|
|
162 If `network', it affects a slot for open-network-process.
|
|
|
163 REGEXP is a regular expression matching a target of I/O operation.
|
|
|
164 CODING-SYSTEM is a coding system to perform code conversion
|
|
|
165 on the I/O operation, or a cons of coding systems for decoding and
|
|
|
166 encoding respectively, or a function symbol which returns the cons.
|
|
|
167 Optional arg OPERATION if non-nil specifies directly one of slots above.
|
|
|
168 The valid value is: insert-file-contents, write-region,
|
|
|
169 call-process, call-process-region, start-process, or open-network-stream.
|
|
|
170 If OPERATION is specified, TARGET-TYPE is ignored.
|
|
|
171 See the documentation of `coding-system-alist' for more detail." nil nil)
|
|
|
172
|
|
|
173 (autoload 'compose-region "mule-util" "\
|
|
|
174 Compose characters in the current region into one composite character.
|
|
|
175 From a Lisp program, pass two arguments, START to END.
|
|
|
176 The composite character replaces the composed characters.
|
|
|
177 BUFFER defaults to the current buffer if omitted." t nil)
|
|
|
178
|
|
|
179 (autoload 'decompose-region "mule-util" "\
|
|
|
180 Decompose any composite characters in the current region.
|
|
|
181 From a Lisp program, pass two arguments, START to END.
|
|
|
182 This converts each composite character into one or more characters,
|
|
|
183 the individual characters out of which the composite character was formed.
|
|
|
184 Non-composite characters are left as-is. BUFFER defaults to the current
|
|
|
185 buffer if omitted." t nil)
|
|
|
186
|
|
|
187 (defconst reference-point-alist '((tl . 0) (tc . 1) (tr . 2) (ml . 3) (mc . 4) (mr . 5) (bl . 6) (bc . 7) (br . 8) (top-left . 0) (top-center . 1) (top-right . 2) (mid-left . 3) (mid-center . 4) (mid-right . 5) (bottom-left . 6) (bottom-center . 7) (bottom-right . 8) (0 . 0) (1 . 1) (2 . 2) (3 . 3) (4 . 4) (5 . 5) (6 . 6) (7 . 7) (8 . 8)) "\
|
|
|
188 Alist of reference point symbols vs reference point codes.
|
|
|
189 Meanings of reference point codes are as follows:
|
|
|
190
|
|
|
191 0----1----2 <-- ascent 0:tl or top-left
|
|
|
192 | | 1:tc or top-center
|
|
|
193 | | 2:tr or top-right
|
|
|
194 | | 3:ml or mid-left
|
|
|
195 | 4 <--+---- center 4:mc or mid-center
|
|
|
196 | | 5:mr or mid-right
|
|
|
197 --- 3 5 <-- baseline 6:bl or bottom-left
|
|
|
198 | | 7:bc or bottom-center
|
|
|
199 6----7----8 <-- descent 8:br or bottom-right
|
|
|
200
|
|
|
201 Reference point symbols are to be used to specify composition rule of
|
|
|
202 the form (GLOBAL-REF-POINT . NEW-REF-POINT), where GLOBAL-REF-POINT
|
|
|
203 is a reference point in the overall glyphs already composed, and
|
|
|
204 NEW-REF-POINT is a reference point in the new glyph to be added.
|
|
|
205
|
|
|
206 For instance, if GLOBAL-REF-POINT is 8 and NEW-REF-POINT is 1, the
|
|
|
207 overall glyph is updated as follows:
|
|
|
208
|
|
|
209 +-------+--+ <--- new ascent
|
|
|
210 | | |
|
|
|
211 | global| |
|
|
|
212 | glyph | |
|
|
|
213 --- | | | <--- baseline (doesn't change)
|
|
|
214 +----+--+--+
|
|
|
215 | | new |
|
|
|
216 | |glyph|
|
|
|
217 +----+-----+ <--- new descent
|
|
|
218 ")
|
|
|
219
|
|
|
220 (autoload 'compose-chars "mule-util" "\
|
|
|
221 Return one char string composed from the arguments.
|
|
|
222 Each argument is a character (including a composite chararacter)
|
|
|
223 or a composition rule.
|
|
|
224 A composition rule has the form (GLOBAL-REF-POINT . NEW-REF-POINT).
|
|
|
225 See the documentation of `reference-point-alist' for more detail." nil nil)
|
|
|
226
|
|
|
227 (autoload 'decompose-composite-char "mule-util" "\
|
|
|
228 Convert composite character CHAR to a string containing components of CHAR.
|
|
|
229 Optional 1st arg TYPE specifies the type of sequence returned.
|
|
|
230 It should be `string' (default), `list', or `vector'.
|
|
|
231 Optional 2nd arg WITH-COMPOSITION-RULE non-nil means the returned
|
|
|
232 sequence contains embedded composition rules if any. In this case, the
|
|
|
233 order of elements in the sequence is the same as arguments for
|
|
|
234 `compose-chars' to create CHAR.
|
|
|
235 If TYPE is omitted or is `string', composition rules are omitted
|
|
|
236 even if WITH-COMPOSITION-RULE is t." nil nil)
|
|
|
237
|
|
|
238 ;;;***
|
|
|
239
|
|
|
240 ;;;### (autoloads (vn-decompose-viqr-buffer vn-decompose-viqr vn-compose-viqr-buffer vn-compose-viqr) "vietnamese" "mule/vietnamese.el")
|
|
|
241
|
|
|
242 (autoload 'vn-compose-viqr "vietnamese" "\
|
|
|
243 Convert 'VIQR' mnemonics of the current region to
|
|
|
244 pre-composed Vietnamese characaters." t nil)
|
|
|
245
|
|
|
246 (autoload 'vn-compose-viqr-buffer "vietnamese" nil t nil)
|
|
|
247
|
|
|
248 (autoload 'vn-decompose-viqr "vietnamese" "\
|
|
|
249 Convert pre-composed Vietnamese characaters of the current region to
|
|
|
250 'VIQR' mnemonics." t nil)
|
|
|
251
|
|
|
252 (autoload 'vn-decompose-viqr-buffer "vietnamese" nil t nil)
|
|
|
253
|
|
|
254 ;;;***
|
|
|
255
|
|
|
256 (provide 'mule-autoloads)
|
|
|
257 ))
|
