R devel - May 2007 - Duplicate assignment in function newbzfile on R-trunk

There's a duplicated assignment to new->fgetc in function newbzfile:

Index: src/main/connections.c
==================================================================---
src/main/connections.c      (revision 41502)
+++ src/main/connections.c      (working copy)
@@ -1311,7 +1311,6 @@
      new->vfprintf = &dummy_vfprintf;
      new->fgetc_internal = &bzfile_fgetc_internal;
      new->fgetc = &dummy_fgetc;
-    new->fgetc = &dummy_fgetc;
      new->seek = &null_seek;
      new->fflush = &null_fflush;
      new->read = &bzfile_read;


Jeff
-- 
http://biostat.mc.vanderbilt.edu/JeffreyHorner