Index: lib/syntax_tools/src/erl_prettypr.erl
===================================================================
RCS file: /hipe/otp/lib/syntax_tools/src/erl_prettypr.erl,v
retrieving revision 1.56
diff -u -r1.56 erl_prettypr.erl
--- lib/syntax_tools/src/erl_prettypr.erl	28 Mar 2007 09:59:01 -0000	1.56
+++ lib/syntax_tools/src/erl_prettypr.erl	13 Aug 2007 20:03:28 -0000
@@ -640,7 +640,7 @@
 		   beside(par(Es), floating(text(">>"))));
 
 	binary_field ->
-	    Ctxt1 = reset_prec(Ctxt),
+	    Ctxt1 = set_prec(Ctxt, max_prec()),
 	    D1 = lay(erl_syntax:binary_field_body(Node), Ctxt1),
 	    D2 = case erl_syntax:binary_field_types(Node) of
 		     [] ->
