Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
f59836fe
Commit
f59836fe
authored
Feb 27, 2008
by
Kim F. Storm
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(current_column, current_column_1, Fmove_to_column)
(compute_motion): Adapt to new glyph code encoding.
parent
ea92fc1a
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
14 additions
and
17 deletions
+14
-17
src/indent.c
src/indent.c
+14
-17
No files found.
src/indent.c
View file @
f59836fe
...
...
@@ -447,9 +447,9 @@ current_column ()
next_element_from_display_vector does it. */
Lisp_Object
entry
=
AREF
(
charvec
,
i
);
if
(
INTEGER
P
(
entry
)
&&
GLYPH_CHAR_VALID_P
(
XFASTINT
(
entry
))
)
c
=
FAST_
GLYPH_C
HAR
(
XFASTINT
(
entry
)
)
;
if
(
GLYPH_CODE_
P
(
entry
)
&&
GLYPH_
CODE_
CHAR_VALID_P
(
entry
))
c
=
GLYPH_C
ODE_CHAR
(
entry
);
else
c
=
' '
;
}
...
...
@@ -583,12 +583,11 @@ current_column_1 ()
{
/* This should be handled the same as
next_element_from_display_vector does it. */
Lisp_Object
entry
;
entry
=
AREF
(
charvec
,
i
);
Lisp_Object
entry
=
AREF
(
charvec
,
i
);
if
(
INTEGER
P
(
entry
)
&&
GLYPH_CHAR_VALID_P
(
XFASTINT
(
entry
))
)
c
=
FAST_
GLYPH_C
HAR
(
XFASTINT
(
entry
)
)
;
if
(
GLYPH_CODE_
P
(
entry
)
&&
GLYPH_
CODE_
CHAR_VALID_P
(
entry
))
c
=
GLYPH_C
ODE_CHAR
(
entry
);
else
c
=
' '
;
...
...
@@ -1021,13 +1020,11 @@ The return value is the current column. */)
{
/* This should be handled the same as
next_element_from_display_vector does it. */
Lisp_Object
entry
=
AREF
(
charvec
,
i
);
Lisp_Object
entry
;
entry
=
AREF
(
charvec
,
i
);
if
(
INTEGERP
(
entry
)
&&
GLYPH_CHAR_VALID_P
(
XFASTINT
(
entry
)))
c
=
FAST_GLYPH_CHAR
(
XFASTINT
(
entry
));
if
(
GLYPH_CODE_P
(
entry
)
&&
GLYPH_CODE_CHAR_VALID_P
(
entry
))
c
=
GLYPH_CODE_CHAR
(
entry
);
else
c
=
' '
;
...
...
@@ -1627,9 +1624,9 @@ compute_motion (from, fromvpos, fromhpos, did_motion, to, tovpos, tohpos, width,
next_element_from_display_vector does it. */
Lisp_Object
entry
=
AREF
(
charvec
,
i
);
if
(
INTEGER
P
(
entry
)
&&
GLYPH_CHAR_VALID_P
(
XFASTINT
(
entry
))
)
c
=
FAST_
GLYPH_C
HAR
(
XFASTINT
(
entry
)
)
;
if
(
GLYPH_CODE_
P
(
entry
)
&&
GLYPH_
CODE_
CHAR_VALID_P
(
entry
))
c
=
GLYPH_C
ODE_CHAR
(
entry
);
else
c
=
' '
;
}
...
...
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