mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-20 20:50:53 -08:00
Code Issues Projects Releases Wiki Activity

(produce_composition): Compare charbuf[i] instead of

Browse source 
args[i] against 0.
(Fterminal_coding_system): Use EQ to compare Lisp objects.
This commit is contained in:
Kenichi Handa 2006-03-09 01:22:51 +00:00
parent 5503f67d90
commit f75c90a9db
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/coding.c
View file

@ -6040,7 +6040,7 @@ produce_composition (coding, charbuf, pos)
for (i = 0; i < len; i++)
{
args[i] = make_number (charbuf[i]);
if (args[i] < 0)
if (charbuf[i] < 0)
return;
}
components = (method == COMPOSITION_WITH_ALTCHARS
@ -8247,7 +8247,7 @@ DEFUN ("terminal-coding-system",
coding_system = CODING_ID_NAME (terminal_coding.id);
/* For backward compatibility, return nil if it is `undecided'. */
return (coding_system != Qundecided ? coding_system : Qnil);
return (! EQ (coding_system, Qundecided) ? coding_system : Qnil);
}
DEFUN ("set-keyboard-coding-system-internal",