mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 04:10:54 -08:00
(set_point): Skip past intangible regions.
This commit is contained in:
parent
07c57952d8
commit
fa7c37595f
1 changed files with 2 additions and 4 deletions
|
|
@ -1650,12 +1650,10 @@ set_point (position, buffer)
|
|||
return;
|
||||
}
|
||||
|
||||
/* If the new position is before an invisible character
|
||||
that has an `invisible' property of value `hidden',
|
||||
/* If the new position is before an intangible character,
|
||||
move forward over all such. */
|
||||
while (! NULL_INTERVAL_P (to)
|
||||
&& EQ (textget (to->plist, Qinvisible), Qhidden)
|
||||
&& ! DISPLAY_INVISIBLE_GLYPH (to))
|
||||
&& ! NILP (textget (to->plist, Qintangible)))
|
||||
{
|
||||
toprev = to;
|
||||
to = next_interval (to);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue