Fossil

Check-in [81a297a6]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Extended log writing to handle multi-line log messages.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:81a297a66a31822122fe78af60018b39880a4f1d
User & Date: aku 2008-01-30 08:20:37
Context
2008-01-30
08:23
Broke package dependency cycle introduced when moving the cset load code from the InitCsets pass to the cset class. check-in: 9e1b461b user: aku tags: trunk
08:20
Extended log writing to handle multi-line log messages. check-in: 81a297a6 user: aku tags: trunk
03:23
Moved the code loading changesets from state to its proper class. check-in: 49dd66f6 user: aku tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tools/cvs2fossil/lib/log.tcl.

134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
	eval [linsert $args 0 ::vc::tools::log::OUT/$op]
	return
    }

    # Write handler. Each message is a line.

    proc OUT/write {system text} {
	puts "$system $text"
	return
    }

    # Progress handler. Uses \r to return to the beginning of the
    # current line without advancing.

    proc OUT/progress {system n max} {







|







134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
	eval [linsert $args 0 ::vc::tools::log::OUT/$op]
	return
    }

    # Write handler. Each message is a line.

    proc OUT/write {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.

    proc OUT/progress {system n max} {