diff options
-rwxr-xr-x | edit-urpm-sources.pl | 9 | ||||
-rw-r--r-- | rpmdrake.spec | 2 |
2 files changed, 9 insertions, 2 deletions
diff --git a/edit-urpm-sources.pl b/edit-urpm-sources.pl index 587017c9..d05a582c 100755 --- a/edit-urpm-sources.pl +++ b/edit-urpm-sources.pl @@ -150,6 +150,7 @@ really want to replace it?"), yesno => 1) or return 0; sub selrow { my ($model, $iter) = $list_tv->get_selection->get_selected; + $model && $iter or return -1; my $path = $model->get_path($iter); my $row = $path->to_string; $path->free; @@ -158,8 +159,10 @@ sub selrow { } sub remove_callback { + my $row = selrow(); + $row == -1 and return; my $wait = wait_msg(N("Please wait, removing medium...")); - my $name = $urpm->{media}[selrow()]{name}; + my $name = $urpm->{media}[$row]{name}; standalone::explanations("Removing medium $name"); $urpm->select_media($name); $urpm->remove_selected_media; @@ -168,7 +171,9 @@ sub remove_callback { } sub edit_callback { - my $medium = $urpm->{media}[selrow()]; + my $row = selrow(); + $row == -1 and return; + my $medium = $urpm->{media}[$row]; my $w = ugtk2->new(N("Edit a source"), grab => 1, center => 1, transient => $mainw->{rwindow}); my ($url_entry, $hdlist_entry, $url, $with_hdlist); gtkadd($w->{window}, diff --git a/rpmdrake.spec b/rpmdrake.spec index 7d060117..7b20685d 100644 --- a/rpmdrake.spec +++ b/rpmdrake.spec @@ -120,6 +120,8 @@ rm -rf $RPM_BUILD_ROOT - edit-urpm-sources: - fix wrong display of medium as "enabled", after adding a medium that has problems and is hence automatically disabled (#995) + - fix crashing when managing to call Remove or Edit with nothing + selected (#970) * Tue Jan 21 2003 Guillaume Cottenceau <gc@mandrakesoft.com> 2.1-3mdk - rpmdrake: |