2 files changed, 6 insertions, 4 deletions
diff --git a/ChangeLog b/ChangeLog
index 45a2b3ed53..7e2c5ffe85 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sun Mar  2 23:03:59 2008  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* io.c (rb_io_ungetc): reduce redundant call.
+
 Sun Mar  2 10:13:12 2008  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* ruby.c (load_file): parse shebang in us-ascii.  a patch from
diff --git a/io.c b/io.c
index dad62a45bc..55959802a4 100644
--- a/io.c
+++ b/io.c
@@ -2429,19 +2429,17 @@ rb_io_readbyte(VALUE io)
 VALUE
 rb_io_ungetc(VALUE io, VALUE c)
 {
-    rb_encoding *enc;
     rb_io_t *fptr;
 
     GetOpenFile(io, fptr);
     rb_io_check_readable(fptr);
     if (NIL_P(c)) return Qnil;
-    enc = io_read_encoding(fptr);
     if (FIXNUM_P(c)) {
 	int cc = FIX2INT(c);
+	rb_encoding *enc = io_read_encoding(fptr);
 	char buf[16];
 
-	rb_enc_mbcput(cc, buf, enc);
-	c = rb_str_new(buf, rb_enc_codelen(cc, enc));
+	c = rb_str_new(buf, rb_enc_mbcput(cc, buf, enc));
     }
     else {
 	SafeStringValue(c);