Differences From:

File tools/cvs2fossil/lib/log.tcl part of check-in [47d52d1efd] - Added convenience method for assertions and used it in place of the existing if/trouble internal constructions. Changed API of 'log write' so that we can defer substituation of the message to when the write actually happen, and converted all places which would be hit by double-substitution. The remaining 'log write' calls will be converted incrementally. by aku on 2007-11-28 05:39:49. [view]

To:

File tools/cvs2fossil/lib/log.tcl part of check-in [81a297a66a] - Extended log writing to handle multi-line log messages. by aku on 2008-01-30 08:20:37. [view]

@@ -137,9 +137,9 @@
 
     # 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