diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index b1d87360b..0c0078f22 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,9 @@
+1997-12-20  Tim Pierce  <twp@skepsis.com>
+
+	* fports.c (scm_pipob): Use scm_generic_fgets for line i/o, since
+	scm_fgets now depends on ftell(3) to know how many bytes were
+	read.  Sigh.
+
 1997-12-15  Tim Pierce  <twp@skepsis.com>
 
 	* gh_data.c (gh_scm2newstr, gh_get_substr): Use RO macros for
diff --git a/libguile/fports.c b/libguile/fports.c
index 284644f83..1fd0d27e3 100644
--- a/libguile/fports.c
+++ b/libguile/fports.c
@@ -483,7 +483,7 @@ scm_ptobfuns scm_pipob =
   (scm_sizet (*) SCM_P ((char *, scm_sizet, scm_sizet, SCM))) local_ffwrite,
   (int (*) SCM_P ((SCM))) local_fflush,
   (int (*) SCM_P ((SCM))) scm_fgetc,
-  (char * (*) SCM_P ((SCM, int *))) scm_fgets,
+  (char * (*) SCM_P ((SCM, int *))) scm_generic_fgets,
   (int (*) SCM_P ((SCM))) local_pclose
 };