1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
|
if {[llength $args] == 0} {
set target all
} elseif {[llength $args] == 1} {
set target [file tail [lindex $args 0]]
} else {
set target "[file tail [lindex $args 0]] ..."
}
set precmd [list fossil commit -m]
set postcmd $args
GetTopDir [pwd] topdir _
# Files to commit might be relative to topdir, take care of that.
# This can happen with -review in a subdir.
set usetopdir ""
foreach f $args {
if { ! [file exists $f]} {
|
|
|
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
|
if {[llength $args] == 0} {
set target all
} elseif {[llength $args] == 1} {
set target [file tail [lindex $args 0]]
} else {
set target "[file tail [lindex $args 0]] ..."
}
set precmd [list fossil commit -no-prompt -m]
set postcmd $args
GetTopDir [pwd] topdir _
# Files to commit might be relative to topdir, take care of that.
# This can happen with -review in a subdir.
set usetopdir ""
foreach f $args {
if { ! [file exists $f]} {
|