From 678dbcad7e400317fc0455f247a201855f4c91ce Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 19 Sep 2008 12:35:27 +0000 Subject: cleanup ($in instead of $o) --- perl-install/any.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/perl-install/any.pm b/perl-install/any.pm index badf40499..5ae7bc6c9 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -893,9 +893,9 @@ sub autologin { } sub display_release_notes { - my ($o, $release_notes) = @_; - if (!$o->isa('interactive::gtk')) { - $o->ask_from_({ title => N("Release Notes"), + my ($in, $release_notes) = @_; + if (!$in->isa('interactive::gtk')) { + $in->ask_from_({ title => N("Release Notes"), messages => $release_notes, #formatAlaTeX(messages::main_license()), }, [ {} ]); return; -- cgit v1.2.1