Fix ccl encoding of unibyte source.

diff --cc src/ChangeLog
index e1d2ba4,57a05ee..bdbdd0b
--- 1/src/ChangeLog
--- 2/src/ChangeLog
+++ b/src/ChangeLog
@@@ -1,3 -1,20 +1,25 @@@
++2010-01-20  Kenichi Handa  <handa@m17n.org>
++
++      * coding.c (consume_chars): If ! multibyte and the encoder is ccl,
++      treat the source as actual byte sequence.
++
+ 2010-01-19  Alan Mackenzie  <acm@muc.de>
+ 
+       Fix spurious before-change-functions invocation from (insert ?\n).
+       * textprop.c (set_text_properties): rename parameter
+       `signal_after_change_p' to `coherent_change_p', and make the
+       invocation of `modify_region' conditional on it.
+ 
+ 2010-01-19  Jan Djärv  <jan.h.d@swipnet.se>
+ 
+       * xsettings.c (apply_xft_settings): Save settings in Vxft_settings
+       for debug purpose.
+       (syms_of_xsettings): Declare xft-settings.
+ 
+ 2010-01-18  Chong Yidong  <cyd@stupidchicken.com>
+ 
+       * editfns.c (Fcurrent_time_string): Doc fix (Bug#5408).
+ 
  2010-01-16  Stefan Monnier  <monnier@iro.umontreal.ca>
  
        * xterm.c (event_handler_gdk): Block input (Bug#5037).

diff --cc src/coding.c
index b3a51eb,b3a51eb..935d32e
--- 1/src/coding.c
--- 2/src/coding.c
+++ b/src/coding.c
@@@ -7417,7 -7417,7 +7417,8 @@@ consume_chars (coding, translation_tabl
        {
          EMACS_INT bytes;
  
--        if (coding->encoder == encode_coding_raw_text)
++        if (coding->encoder == encode_coding_raw_text
++            || coding->encoder == encode_coding_ccl)
            c = *src++, pos++;
          else if ((bytes = MULTIBYTE_LENGTH (src, src_end)) > 0)
            c = STRING_CHAR_ADVANCE_NO_UNIFY (src), pos += bytes;