diff options
author | Thierry Vignaud <tv@mageia.org> | 2013-04-21 01:20:57 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2013-04-21 01:20:57 +0000 |
commit | bcb3d840b7a5adda6e3974d2d57556f1545c72a3 (patch) | |
tree | 0698702cf1f2f2537a7ec2632f0291afbdbad389 | |
parent | 632c03b849d318da0e7b2fa829a12d99e62879b8 (diff) | |
download | drakx-backup-do-not-use-bcb3d840b7a5adda6e3974d2d57556f1545c72a3.tar drakx-backup-do-not-use-bcb3d840b7a5adda6e3974d2d57556f1545c72a3.tar.gz drakx-backup-do-not-use-bcb3d840b7a5adda6e3974d2d57556f1545c72a3.tar.bz2 drakx-backup-do-not-use-bcb3d840b7a5adda6e3974d2d57556f1545c72a3.tar.xz drakx-backup-do-not-use-bcb3d840b7a5adda6e3974d2d57556f1545c72a3.zip |
perl_checker cleanups
-rw-r--r-- | perl-install/diskdrake/hd_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index 80536b24f..89d46dbfd 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -97,7 +97,7 @@ sub main { current_entry_changed($current_kind, $current_entry); $lock = 0; if ($o_refresh_gui) { - my $new_page = $o_refresh_gui > 1 ? $notebook_widget->get_current_page() : 0; + my $new_page = $o_refresh_gui > 1 ? $notebook_widget->get_current_page : 0; $notebook_widget->set_current_page(-1); $notebook_widget->set_current_page($new_page); } @@ -141,7 +141,7 @@ sub try_ { } if (!diskdrake::interactive::is_part_existing($current_entry, $all_hds)) { - $current_entry = '' ; + $current_entry = ''; } elsif (!$dm_active_before && $current_entry->{dm_active} && $current_entry->{dm_name}) { if (my $mapped_part = fs::get::device2part("mapper/$current_entry->{dm_name}", $all_hds->{dmcrypts})) { $current_entry = $mapped_part; |