diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2002-09-03 22:18:16 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-09-03 22:18:16 +0000 |
| commit | fde097df512296afdadd95f02d1caf3bf263f2f3 (patch) | |
| tree | 992976ce557d4956674e5572607a7ae713915c7d /edit-urpm-sources.pl | |
| parent | 645ac97d01fb361313e7ad63dddde62d23b31dff (diff) | |
| download | rpmdrake-fde097df512296afdadd95f02d1caf3bf263f2f3.tar rpmdrake-fde097df512296afdadd95f02d1caf3bf263f2f3.tar.gz rpmdrake-fde097df512296afdadd95f02d1caf3bf263f2f3.tar.bz2 rpmdrake-fde097df512296afdadd95f02d1caf3bf263f2f3.tar.xz rpmdrake-fde097df512296afdadd95f02d1caf3bf263f2f3.zip | |
- disable prerendered titles until I have the new banner
- don't update when no source is selected for updates...
- new ugtk without BEGIN so that we can have an OK error message when X is not available
- use parenthesis for as much functions as seen since when requir'ing modules sometimes a function call is considered a bareword
Diffstat (limited to 'edit-urpm-sources.pl')
| -rwxr-xr-x | edit-urpm-sources.pl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/edit-urpm-sources.pl b/edit-urpm-sources.pl index 0a4c09d6..fde870d4 100755 --- a/edit-urpm-sources.pl +++ b/edit-urpm-sources.pl @@ -22,7 +22,6 @@ $> and (exec {'consolehelper'} $0, @ARGV or die "consolehelper missing"); -use lib qw(/usr/lib/libDrakX); use strict; use rpmdrake; @@ -201,7 +200,7 @@ sub update_callback { gtksignal_connect(new Gtk::Button(_("Update")), clicked => sub { $w->{retval} = 1; Gtk->main_quit }), gtksignal_connect(new Gtk::Button(_("Cancel")), clicked => sub { $w->{retval} = 0; Gtk->main_quit })))); $w->{rwindow}->set_position('center'); - if ($w->main) { + if ($w->main && grep { $_->get_active } @buttons) { each_index { $_->get_active and $urpm->select_media($urpm->{media}[$::i]{name}) } @buttons; foreach (@{$urpm->{media}}) { #- force ignored media to be returned alive (forked from urpmi.updatemedia...) $_->{modified} and delete $_->{ignore}; @@ -213,7 +212,7 @@ sub update_callback { sub proxy_callback { my $w = my_gtk->new(_("Configure proxies")); - my ($proxy, $proxy_user) = curl_download::readproxy; + my ($proxy, $proxy_user) = curl_download::readproxy(); my ($user, $pass) = $proxy_user =~ /^(.+):(.+)$/; gtkadd($w->{window}, gtkpack__(new Gtk::VBox(0, 5), |