From 19fee2e2e075950120573f4063b22fb8082fad0e Mon Sep 17 00:00:00 2001 From: akr Date: Tue, 23 Dec 2008 15:22:18 +0000 Subject: [PATCH] * io.c (rb_io_init_copy): call io_seek only if io_tell succeeds. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@20954 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 8 ++++++-- io.c | 5 ++++- 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index c32f12d5b8..d12bec132c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,11 +1,15 @@ +Tue Dec 23 23:49:37 2008 Tanaka Akira + + * io.c (rb_io_init_copy): call io_seek only if io_tell succeeds. + Tue Dec 23 22:57:48 2008 Tanaka Akira - * process.c (rb_fork): don't propagete an error message if error + * process.c (rb_fork): don't propagate an error message if error buffer not given. Tue Dec 23 21:55:05 2008 Tanaka Akira - * process.c (rb_fork): propagete an error message from child to parent. + * process.c (rb_fork): propagate an error message from child to parent. (rb_f_exec): show details of error in child process on exception. (save_redirect_fd): add error message arguments. diff --git a/io.c b/io.c index eae314b73b..e86a59ae73 100644 --- a/io.c +++ b/io.c @@ -5368,6 +5368,7 @@ rb_io_init_copy(VALUE dest, VALUE io) rb_io_t *fptr, *orig; int fd; VALUE write_io; + off_t pos; io = rb_io_get_io(io); if (dest == io) return dest; @@ -5386,7 +5387,9 @@ rb_io_init_copy(VALUE dest, VALUE io) fd = ruby_dup(orig->fd); fptr->fd = fd; - io_seek(fptr, io_tell(orig), SEEK_SET); + pos = io_tell(orig); + if (0 <= pos) + io_seek(fptr, pos, SEEK_SET); if (fptr->mode & FMODE_BINMODE) { rb_io_binmode(dest); }