mozplatformqa-jenkins-config/delete_disabled.tcl

17 строки
248 B
Tcl
Исходник Обычный вид История

#!/usr/bin/tclsh
set files [glob jobs/*/config.xml]
foreach file $files {
set fd [open $file]
set contents [read $fd]
close $fd
if {[regexp {<disabled>true} $contents match]} {
file delete $file
puts "Removed $file."
}
}