diff --git a/doc/lispref/records.texi b/doc/lispref/records.texi
index a924bafbb965126434f147471f10d7eb70437050..2533a8a4ca1f5d31b0822e01b3ce381e7ea1cbf5 100644
--- a/doc/lispref/records.texi
+++ b/doc/lispref/records.texi
@@ -56,7 +56,7 @@ and remaining slots are the rest of the arguments, @var{objects}.
 
 @example
 @group
-(vector 'foo 23 [bar baz] "rats")
+(record 'foo 23 [bar baz] "rats")
      @result{} #s(foo 23 [bar baz] "rats")
 @end group
 @end example