aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2006-11-28 17:38:47 +0000
committerThierry Vignaud <tv@mandriva.org>2006-11-28 17:38:47 +0000
commit98465268b4a9cdabd6dcda1947a74fe3340bba53 (patch)
tree9d67e3df4f7c5871c25b7f00f717d8c781b0da93
parent74c477d6837cf600492e3e6f3e7f0e1114eb09fa (diff)
downloadrpmdrake-98465268b4a9cdabd6dcda1947a74fe3340bba53.tar
rpmdrake-98465268b4a9cdabd6dcda1947a74fe3340bba53.tar.gz
rpmdrake-98465268b4a9cdabd6dcda1947a74fe3340bba53.tar.bz2
rpmdrake-98465268b4a9cdabd6dcda1947a74fe3340bba53.tar.xz
rpmdrake-98465268b4a9cdabd6dcda1947a74fe3340bba53.zip
(edit_callback) enable to set perl medium downloader (#25876)
-rwxr-xr-xedit-urpm-sources.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/edit-urpm-sources.pl b/edit-urpm-sources.pl
index 1d693dc0..40770de0 100755
--- a/edit-urpm-sources.pl
+++ b/edit-urpm-sources.pl
@@ -405,7 +405,7 @@ sub edit_callback {
my $config = urpm::cfg::load_config_raw($urpm->{config}, 1);
my ($verbatim_medium) = grep { $medium->{name} eq $_->{name} } @$config;
my $w = ugtk2->new(N("Edit a medium"), grab => 1, center => 1, transient => $mainw->{real_window});
- my ($url_entry, $hdlist_entry, $url, $with_hdlist);
+ my ($url_entry, $hdlist_entry, $downloader_entry, $url, $with_hdlist, $downloader);
gtkadd(
$w->{window},
gtkpack_(
@@ -415,6 +415,7 @@ sub edit_callback {
{},
[ gtknew('Label_Left', text => N("URL:")), $url_entry = gtkentry($verbatim_medium->{url}) ],
[ gtknew('Label_Left', text => N("Relative path to synthesis/hdlist:")), $hdlist_entry = gtkentry($verbatim_medium->{with_hdlist}) ],
+ [ gtknew('Label_Left', text => N("Downloader:")), $downloader_entry = gtkentry($verbatim_medium->{downloader}) ],
),
0, Gtk2::HSeparator->new,
0, gtkpack(
@@ -428,6 +429,7 @@ sub edit_callback {
clicked => sub {
$w->{retval} = 1;
($url, $with_hdlist) = ($url_entry->get_text, $hdlist_entry->get_text);
+ $downloader = $downloader_entry->get_text;
Gtk2->main_quit;
},
),
@@ -452,7 +454,7 @@ sub edit_callback {
undef $saved_proxy if !defined $saved_proxy->{http_proxy} && !defined $saved_proxy->{ftp_proxy};
urpm::media::select_media($urpm, $name);
urpm::media::remove_selected_media($urpm);
- add_medium_and_check($urpm, { nolock => 1, proxy => $saved_proxy }, $name, $url, $with_hdlist, update => $update);
+ add_medium_and_check($urpm, { nolock => 1, proxy => $saved_proxy }, $name, $url, $with_hdlist, update => $update, if_($downloader, downloader => $downloader));
return $name;
}
return undef;