Wrong procedure.

diff --git a/doc/ref-manual/io.texi b/doc/ref-manual/io.texi
index 617230b7862c377c9cbea7fdf189ce86d9575e72..b36dbfac7be5918ca04d311a3094d08a3a280f2d 100644 (file)
--- a/doc/ref-manual/io.texi
+++ b/doc/ref-manual/io.texi
@@ -1516,7 +1516,7 @@ above.
 This procedure is @strong{deprecated}; instead use
 @example
 @group
-(define-print-method (record-constructor @var{record-type})
+(define-print-method (record-predicate @var{record-type})
   @var{unparser-method})
 @end group
 @end example