diff --git a/ChangeLog b/ChangeLog
index 564afd52a0..f5cfbadb06 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Fri Aug 27 12:13:50 2004  Tanaka Akira  <akr@m17n.org>
+
+	* ext/stringio/stringio.c (Init_stringio): add StringIO#readpartial as
+	  an alias for StringIO#sysread.
+
 Fri Aug 27 10:14:21 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* process.c (rb_proc_exec): strip trailing spaces.  [ruby-dev:24143]
diff --git a/ext/stringio/stringio.c b/ext/stringio/stringio.c
index 98d3c08ee5..706385a0b2 100644
--- a/ext/stringio/stringio.c
+++ b/ext/stringio/stringio.c
@@ -997,6 +997,7 @@ Init_stringio()
     rb_define_method(StringIO, "readlines", strio_readlines, -1);
     rb_define_method(StringIO, "read", strio_read, -1);
     rb_define_method(StringIO, "sysread", strio_sysread, -1);
+    rb_define_method(StringIO, "readpartial", strio_sysread, -1);
 
     rb_define_method(StringIO, "write", strio_write, 1);
     rb_define_method(StringIO, "<<", strio_addstr, 1);