*** empty log message ***

1 files changed, 11 insertions, 12 deletions

diff --git a/lispref/streams.texi b/lispref/streams.texi
index cf3f14a095f..5521f74d876 100644
--- a/lispref/streams.texi
+++ b/lispref/streams.texi
@@ -390,11 +390,6 @@ initially located as shown immediately before the @samp{h} in
 @cindex print example
 @example
 @group
-(setq m (set-marker (make-marker) 10 (get-buffer "foo")))
-     @result{} #<marker at 10 in foo>
-@end group
-
-@group
 ---------- Buffer: foo ----------
 This is t@point{}he contents of foo.
 ---------- Buffer: foo ----------
@@ -404,10 +399,6 @@ This is t@point{}he contents of foo.
      @result{} "This is the output"
 
 @group
-m
-     @result{} #<marker at 32 in foo>
-@end group
-@group
 ---------- Buffer: foo ----------
 This is t
 "This is the output"
@@ -431,8 +422,8 @@ This is the @point{}output
 @end group
 
 @group
-m
-     @result{} #<marker at 11 in foo>
+(setq m (copy-marker 10))
+     @result{} #<marker at 10 in foo>
 @end group
 
 @group
@@ -450,7 +441,7 @@ he @point{}output
 
 @group
 m
-     @result{} #<marker at 35 in foo>
+     @result{} #<marker at 34 in foo>
 @end group
 @end example
 
@@ -723,6 +714,14 @@ In the second expression, the local binding of
 @code{prin1}, but not during the printing of the result.
 @end defvar
 
+@tindex print-escape-nonascii
+@defvar print-escape-nonascii
+If this variable is non-@code{nil}, then unibyte non-@sc{ASCII}
+characters in strings are unconditionally printed as backslash sequences
+by the print functions @code{prin1} and @code{print} that print with
+quoting.
+@end defvar
+
 @defvar print-length
 @cindex printing limits
 The value of this variable is the maximum number of elements to print in