diff options
| -rwxr-xr-x | perl-install/standalone/drakups | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/drakups b/perl-install/standalone/drakups index ca2d7f1bf..60d626f40 100755 --- a/perl-install/standalone/drakups +++ b/perl-install/standalone/drakups @@ -151,7 +151,7 @@ Please fill in its name, its driver and its port.", $model, $vendor); }, post => sub { $port = '/dev/' . $port if $port !~ m!/dev/!; - return 'end', + return 'end'; }, }, end => { @@ -196,9 +196,9 @@ sub load_access_conf() { # misc gui data sub edit_row { - my ($model, $iter) = @_; + my ($model, $o_iter) = @_; # create new item if needed (that is when adding a new one) at end of list - $iter ||= $model->append; + my $iter = $o_iter || $model->append; my $dialog = Gtk2::Dialog->new; $dialog->set_transient_for($w->{real_window}); $dialog->set_modal(1); |