Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
67406ef4
Commit
67406ef4
authored
Feb 24, 1994
by
Karl Heuer
Browse files
(compute_motion, vmotion): Use Fget_char_property to test for invisibility.
parent
3ae8ced7
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
5 deletions
+5
-5
src/indent.c
src/indent.c
+5
-5
No files found.
src/indent.c
View file @
67406ef4
...
...
@@ -474,7 +474,7 @@ compute_motion (from, fromvpos, fromhpos, to, tovpos, tohpos, width, hscroll, ta
while
(
pos
==
next_invisible
&&
pos
<
to
)
{
XFASTINT
(
position
)
=
pos
;
prop
=
Fget_
text
_property
(
position
,
prop
=
Fget_
char
_property
(
position
,
Qinvisible
,
Fcurrent_buffer
());
{
...
...
@@ -663,9 +663,9 @@ vmotion (from, vtarget, width, hscroll, window)
&&
indented_beyond_p
(
prevline
,
selective
))
#ifdef USE_TEXT_PROPERTIES
/* watch out for newlines with `invisible' property */
||
!
NILP
(
Fget_
text
_property
(
XFASTINT
(
prevline
),
||
!
NILP
(
Fget_
char
_property
(
XFASTINT
(
prevline
),
Qinvisible
,
Fcurrent_buffer
()
))
window
))
#endif
))
prevline
=
find_next_newline
(
prevline
-
1
,
-
1
);
...
...
@@ -700,9 +700,9 @@ vmotion (from, vtarget, width, hscroll, window)
||
!
indented_beyond_p
(
prevline
,
selective
))
#ifdef USE_TEXT_PROPERTIES
/* watch out for newlines with `invisible' property */
&&
NILP
(
Fget_
text
_property
(
XFASTINT
(
prevline
),
&&
NILP
(
Fget_
char
_property
(
XFASTINT
(
prevline
),
Qinvisible
,
Fcurrent_buffer
()
))
window
))
#endif
))
break
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment