17 |
+ my $repo = $DB->get($name) or next; |
+ my $repo = $DB->get($name) or next; |
18 |
+ my $rname = ( $name eq 'base' )? 'os' :$name; |
+ my $rname = ( $name eq 'base' )? 'os' :$name; |
19 |
+ # setprop BaseURL "http://vault.centos.org/$SUBVER/$rname/\$basearch/" |
+ # setprop BaseURL "http://vault.centos.org/$SUBVER/$rname/\$basearch/" |
20 |
+ #repo->set_prop('BaseURL', "http://vault.centos.org/$SUBVER/$rname/\$basearch/"); |
+ repo->set_prop('BaseURL', "http://vault.centos.org/$SUBVER/$rname/\$basearch/"); |
21 |
+ # delprop MirrorList |
+ # delprop MirrorList |
22 |
+ $repo->delete_prop('MirrorList'); |
+ $repo->delete_prop('MirrorList'); |
23 |
+ } |
+ } |