680
681
682
683
684
685
686
687
688
689
690
691
692
693
|
}
# Figure out GIT revision from arguments
proc eskil::rev::GIT::ParseRevs {filename revs} {
set result ""
foreach rev $revs {
switch -glob -- $rev {
HEAD - master - * { # Let anything through for now
lappend result $rev
}
}
}
return $result
}
|
>
>
>
|
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
|
}
# Figure out GIT revision from arguments
proc eskil::rev::GIT::ParseRevs {filename revs} {
set result ""
foreach rev $revs {
switch -glob -- $rev {
0 {
lappend result HEAD
}
HEAD - master - * { # Let anything through for now
lappend result $rev
}
}
}
return $result
}
|