proc repo_repomd_add_exts {selfName} {
upvar $selfName self
set repodata [$self(handle) add_repodata 0]
+ $repodata extend_to_repo
repo_repomd_add_ext self $repodata "filelists" "FL"
$repodata internalize
}
proc repo_susetags_add_exts {selfName} {
upvar $selfName self
set repodata [$self(handle) add_repodata 0]
+ $repodata extend_to_repo
repo_susetags_add_ext self $repodata "packages.FL" "FL"
repo_susetags_add_ext self $repodata "packages.FL.gz" "FL"
$repodata internalize
puts "nothing matches '$arg'"
exit 1
}
- if {[$sel flags] & $solv::Selection_SELECTION_FILELIST} {
+ if {[$sel cget -flags] & $solv::Selection_SELECTION_FILELIST} {
puts "\[using file list match for '$arg']"
}
- if {[$sel flags] & $solv::Selection_SELECTION_PROVIDES} {
+ if {[$sel cget -flags] & $solv::Selection_SELECTION_PROVIDES} {
puts "\[using capability match for '$arg']"
}
lappend jobs {*}[$sel jobs $cmdactionmap($cmd)]
set cltype [$cl cget -type]
if {$cltype == $solv::Transaction_SOLVER_TRANSACTION_UPGRADED || $cltype ==$solv::Transaction_SOLVER_TRANSACTION_DOWNGRADED} {
set op [$trans othersolvable $p]
- puts [format { - %s -> %s} [$p str] [$p str]]
+ puts [format { - %s -> %s} [$p str] [$op str]]
} else {
puts [format { - %s} [$p str]]
}