From 88f4a01a64b63e5dbee7dab85242ca480a96c71e Mon Sep 17 00:00:00 2001
From: Rene Rivera <grafikrobot@gmail.com>
Date: Fri, 15 Nov 2002 05:13:59 +0000
Subject: [PATCH] Some extra whitespace formatting fixes.

[SVN r16246]
---
 src/util/print.jam | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/util/print.jam b/src/util/print.jam
index 034ce1aab..203b31b2f 100644
--- a/src/util/print.jam
+++ b/src/util/print.jam
@@ -78,12 +78,12 @@ rule section (
                     local p = [ MATCH "(.*)([	 ]*)(::)$" : $(paragraph[-1]) ] ;
                     if $(p[2]) && $(p[2]) != "" { paragraph = $(paragraph[1--2]) $(p[1]): ; }
                     else { paragraph = $(paragraph[1--2]) $(p[1]) ; }
-                    lines [ split-at-words " " $(paragraph) ] : "  " ;
+                    lines [ split-at-words " " $(paragraph) ] : "  " "  " ;
                     lines ;
                 }
                 else
                 {
-                    lines [ split-at-words " " $(paragraph) ] : "  " ;
+                    lines [ split-at-words " " $(paragraph) ] : "  " "  " ;
                     lines ;
                 }
             }
@@ -140,6 +140,7 @@ rule split-at-words (
     )
 {
     local lines = ;
+    text = [ string.words $(text:J=" ") ] ;
     text = $(text:J=" ") ;
     margin ?= 78 ;
     local char-match-1 = ".?" ;