SHA1 Hash:	81a297a66a31822122fe78af60018b39880a4f1d
Date:	2008-01-30 08:20:37
User:	aku
Comment:	Extended log writing to handle multi-line log messages.
Timelines:	ancestors | descendants | both | trunk
Other Links:	files | ZIP archive | manifest

• branch=trunk inherited from [a28c83647d]
• sym-trunk inherited from [a28c83647d]

Modified tools/cvs2fossil/lib/log.tcl from [875fe25bc7] to [4031b6876e].

@@ -136,11 +136,11 @@
     }
 
     # Write handler. Each message is a line.
 
     proc OUT/write {system text} {
-	puts "$system $text"
+	puts "$system [join [split $text \n] "\n$system "]"
 	return
     }
 
     # Progress handler. Uses \r to return to the beginning of the
     # current line without advancing.