1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
|
if {[info exists opts(doptrev2)] && $opts(doptrev2) ne ""} {
lappend revs $opts(doptrev2)
}
# TODO: Trigger this on DirDiff, so a rerun can do it, and maybe have rev
# GUI fields
if {$::dirdiff(leftDir) eq $::dirdiff(rightDir) &&
$::dirdiff(leftDir) ne ""} {
set fullname $::dirdiff(leftDir)
set type [detectRevSystem $fullname]
# Is this a revision system with dirdiff support?
if {[info commands eskil::rev::${type}::mount] ne ""} {
# No -r given; fall back on current.
if {[llength $revs] == 0} {
# Optimisation attempt for checkout vs latest, see if there
|
|
|
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
|
if {[info exists opts(doptrev2)] && $opts(doptrev2) ne ""} {
lappend revs $opts(doptrev2)
}
# TODO: Trigger this on DirDiff, so a rerun can do it, and maybe have rev
# GUI fields
if {$::dirdiff(leftDir) eq $::dirdiff(rightDir) &&
$::dirdiff(leftDir) ne "" && ![string match *.kit $::dirdiff(leftDir)]} {
set fullname $::dirdiff(leftDir)
set type [detectRevSystem $fullname]
# Is this a revision system with dirdiff support?
if {[info commands eskil::rev::${type}::mount] ne ""} {
# No -r given; fall back on current.
if {[llength $revs] == 0} {
# Optimisation attempt for checkout vs latest, see if there
|