456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
|
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
|
-
+
+
+
|
}
if {[llength $files] > 0} {
# Fossil diff only handles one file at a time.
set res ""
foreach file $files {
set fcmd $cmd
lappend fcmd $file
if {[catch {eval $cmd} fres]} {
if {[catch {eval $fcmd} fres]} {
tk_messageBox -icon error -title "FOSSIL error" -message $fres
return ""
}
# Fake the per-file rows
append res "Index: $file\n==================================\n"
append res $fres
}
} else {
# Include added files
lappend cmd -N
if {[catch {eval $cmd} res]} {
tk_messageBox -icon error -title "FOSSIL error" -message $res
|