diff options
| author | Chong Yidong | 2009-04-16 03:58:44 +0000 |
|---|---|---|
| committer | Chong Yidong | 2009-04-16 03:58:44 +0000 |
| commit | 0a0e7d497361df7a6c8ad3437847e4e6fc8130fd (patch) | |
| tree | 6e6810d47bee9c9e83290a28426d6b8b580586e3 /src | |
| parent | 23e41d152943b5d94170226b3d0c6f900cb96be0 (diff) | |
| download | emacs-0a0e7d497361df7a6c8ad3437847e4e6fc8130fd.tar.gz emacs-0a0e7d497361df7a6c8ad3437847e4e6fc8130fd.zip | |
* keyboard.c (adjust_point_for_property): Disable 2009-02-12
change (Bug#3003).
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/keyboard.c | 24 |
2 files changed, 18 insertions, 11 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 8758ae7d10f..60fd0530617 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2009-04-16 Chong Yidong <cyd@stupidchicken.com> | ||
| 2 | |||
| 3 | * keyboard.c (adjust_point_for_property): Disable 2009-02-12 | ||
| 4 | change (Bug#3003). | ||
| 5 | |||
| 1 | 2009-04-16 Kenichi Handa <handa@m17n.org> | 6 | 2009-04-16 Kenichi Handa <handa@m17n.org> |
| 2 | 7 | ||
| 3 | * xfont.c (xfont_has_char): Special handling of `ja' and `ko' | 8 | * xfont.c (xfont_has_char): Special handling of `ja' and `ko' |
diff --git a/src/keyboard.c b/src/keyboard.c index 527a82b55ff..56506571c2a 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -2048,20 +2048,20 @@ adjust_point_for_property (last_pt, modified) | |||
| 2048 | 2048 | ||
| 2049 | /* Find boundaries `beg' and `end' of the invisible area, if any. */ | 2049 | /* Find boundaries `beg' and `end' of the invisible area, if any. */ |
| 2050 | while (end < ZV | 2050 | while (end < ZV |
| 2051 | /* Stop if we find a spot between two runs of | 2051 | #if 0 |
| 2052 | `invisible' where inserted text would be visible. | 2052 | /* FIXME: We should stop if we find a spot between |
| 2053 | This is important when we have two invisible | 2053 | two runs of `invisible' where inserted text would |
| 2054 | boundaries that enclose an area: if the area is | 2054 | be visible. This is important when we have two |
| 2055 | empty, we need this test in order to make it | 2055 | invisible boundaries that enclose an area: if the |
| 2056 | possible to place point in the middle rather than | 2056 | area is empty, we need this test in order to make |
| 2057 | skip both boundaries. | 2057 | it possible to place point in the middle rather |
| 2058 | Note that this will stop anywhere in a non-sticky | 2058 | than skip both boundaries. However, this code |
| 2059 | text-property, but I don't think there's much we | 2059 | also stops anywhere in a non-sticky text-property, |
| 2060 | can do about that. */ | 2060 | which breaks (e.g.) Org mode. */ |
| 2061 | && (val = get_pos_property (make_number (end), | 2061 | && (val = get_pos_property (make_number (end), |
| 2062 | Qinvisible, Qnil), | 2062 | Qinvisible, Qnil), |
| 2063 | TEXT_PROP_MEANS_INVISIBLE (val)) | 2063 | TEXT_PROP_MEANS_INVISIBLE (val)) |
| 2064 | /* FIXME: write and then use get_pos_property_and_overlay. */ | 2064 | #endif |
| 2065 | && !NILP (val = get_char_property_and_overlay | 2065 | && !NILP (val = get_char_property_and_overlay |
| 2066 | (make_number (end), Qinvisible, Qnil, &overlay)) | 2066 | (make_number (end), Qinvisible, Qnil, &overlay)) |
| 2067 | && (inv = TEXT_PROP_MEANS_INVISIBLE (val))) | 2067 | && (inv = TEXT_PROP_MEANS_INVISIBLE (val))) |
| @@ -2075,9 +2075,11 @@ adjust_point_for_property (last_pt, modified) | |||
| 2075 | end = NATNUMP (tmp) ? XFASTINT (tmp) : ZV; | 2075 | end = NATNUMP (tmp) ? XFASTINT (tmp) : ZV; |
| 2076 | } | 2076 | } |
| 2077 | while (beg > BEGV | 2077 | while (beg > BEGV |
| 2078 | #if 0 | ||
| 2078 | && (val = get_pos_property (make_number (beg), | 2079 | && (val = get_pos_property (make_number (beg), |
| 2079 | Qinvisible, Qnil), | 2080 | Qinvisible, Qnil), |
| 2080 | TEXT_PROP_MEANS_INVISIBLE (val)) | 2081 | TEXT_PROP_MEANS_INVISIBLE (val)) |
| 2082 | #endif | ||
| 2081 | && !NILP (val = get_char_property_and_overlay | 2083 | && !NILP (val = get_char_property_and_overlay |
| 2082 | (make_number (beg - 1), Qinvisible, Qnil, &overlay)) | 2084 | (make_number (beg - 1), Qinvisible, Qnil, &overlay)) |
| 2083 | && (inv = TEXT_PROP_MEANS_INVISIBLE (val))) | 2085 | && (inv = TEXT_PROP_MEANS_INVISIBLE (val))) |