aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/composite.el23
2 files changed, 17 insertions, 11 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 75c16683dca..610b3f5046b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12010-05-01 Eli Zaretskii <eliz@gnu.org>
2
3 * composite.el (compose-region, reference-point-alist): Fix typos
4 in the doc strings.
5
12010-04-28 Alexander Klimov <alserkli@inbox.ru> (tiny change) 62010-04-28 Alexander Klimov <alserkli@inbox.ru> (tiny change)
2 7
3 * calc/calc-graph.el (calc-graph-plot): Use the proper form for 8 * calc/calc-graph.el (calc-graph-plot): Use the proper form for
diff --git a/lisp/composite.el b/lisp/composite.el
index e3753f3bfd0..5b01718fc71 100644
--- a/lisp/composite.el
+++ b/lisp/composite.el
@@ -44,7 +44,7 @@
44A glyph reference point symbol is to be used to specify a composition 44A glyph reference point symbol is to be used to specify a composition
45rule in COMPONENTS argument to such functions as `compose-region'. 45rule in COMPONENTS argument to such functions as `compose-region'.
46 46
47Meanings of glyph reference point codes are as follows: 47The meaning of glyph reference point codes is as follows:
48 48
49 0----1----2 <---- ascent 0:tl or top-left 49 0----1----2 <---- ascent 0:tl or top-left
50 | | 1:tc or top-center 50 | | 1:tc or top-center
@@ -212,7 +212,7 @@ If it is a string, the elements are alternate characters. In
212this case, TAB element has a special meaning. If the first 212this case, TAB element has a special meaning. If the first
213characer is TAB, the glyphs are displayed with left padding space 213characer is TAB, the glyphs are displayed with left padding space
214so that no pixel overlaps with the previous column. If the last 214so that no pixel overlaps with the previous column. If the last
215character is TAB, the glyphs are displayed with rigth padding 215character is TAB, the glyphs are displayed with right padding
216space so that no pixel overlaps with the following column. 216space so that no pixel overlaps with the following column.
217 217
218If it is a vector or list, it is a sequence of alternate characters and 218If it is a vector or list, it is a sequence of alternate characters and
@@ -222,7 +222,7 @@ elements with previously composed N glyphs.
222 222
223A composition rule is a cons of global and new glyph reference point 223A composition rule is a cons of global and new glyph reference point
224symbols. See the documentation of `reference-point-alist' for more 224symbols. See the documentation of `reference-point-alist' for more
225detail. 225details.
226 226
227Optional 4th argument MODIFICATION-FUNC is a function to call to 227Optional 4th argument MODIFICATION-FUNC is a function to call to
228adjust the composition when it gets invalid because of a change of 228adjust the composition when it gets invalid because of a change of
@@ -299,16 +299,16 @@ A composition rule is a cons of glyph reference points of the form
299 (compose-string-internal str 0 (length str) components))) 299 (compose-string-internal str 0 (length str) components)))
300 300
301(defun find-composition (pos &optional limit string detail-p) 301(defun find-composition (pos &optional limit string detail-p)
302 "Return information about a composition at or nearest to buffer position POS. 302 "Return information about a composition at or near buffer position POS.
303 303
304If the character at POS has `composition' property, the value is a list 304If the character at POS has `composition' property, the value is a list
305of FROM, TO, and VALID-P. 305\(FROM TO VALID-P).
306 306
307FROM and TO specify the range of text that has the same `composition' 307FROM and TO specify the range of text that has the same `composition'
308property, VALID-P is t if this composition is valid, and nil if not. 308property, VALID-P is t if this composition is valid, and nil if not.
309 309
310If there's no composition at POS, and the optional 2nd argument LIMIT 310If there's no composition at POS, and the optional 2nd argument LIMIT
311is non-nil, search for a composition toward LIMIT. 311is non-nil, search for a composition toward the position given by LIMIT.
312 312
313If no composition is found, return nil. 313If no composition is found, return nil.
314 314
@@ -316,8 +316,9 @@ Optional 3rd argument STRING, if non-nil, is a string to look for a
316composition in; nil means the current buffer. 316composition in; nil means the current buffer.
317 317
318If a valid composition is found and the optional 4th argument DETAIL-P 318If a valid composition is found and the optional 4th argument DETAIL-P
319is non-nil, the return value is a list of FROM, TO, COMPONENTS, 319is non-nil, the return value is a list of the form
320RELATIVE-P, MOD-FUNC, and WIDTH. 320
321 (FROM TO COMPONENTS RELATIVE-P MOD-FUNC WIDTH)
321 322
322COMPONENTS is a vector of integers, the meaning depends on RELATIVE-P. 323COMPONENTS is a vector of integers, the meaning depends on RELATIVE-P.
323 324
@@ -334,9 +335,9 @@ WIDTH is a number of columns the composition occupies on the screen.
334When Automatic Composition mode is on, this function also finds a 335When Automatic Composition mode is on, this function also finds a
335chunk of text that is automatically composed. If such a chunk is 336chunk of text that is automatically composed. If such a chunk is
336found closer to POS than the position that has `composition' 337found closer to POS than the position that has `composition'
337property, the value is a list of FROM, TO, and a glyph gstring 338property, the value is a list of FROM, TO, and a glyph-string
338the specify how the chunk is composed. See the function 339that specifies how the chunk is to be composed. See the function
339`composition-get-gstring' for the format of the glyph string." 340`composition-get-gstring' for the format of the glyph-string."
340 (let ((result (find-composition-internal pos limit string detail-p))) 341 (let ((result (find-composition-internal pos limit string detail-p)))
341 (if (and detail-p (> (length result) 3) (nth 2 result) (not (nth 3 result))) 342 (if (and detail-p (> (length result) 3) (nth 2 result) (not (nth 3 result)))
342 ;; This is a valid rule-base composition. 343 ;; This is a valid rule-base composition.