From fd595b4a25c09427f335f0afc2241569d287c544 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 18 Sep 2012 10:39:48 +0000
Subject: (main_license) factorize call to warning_about_patents()

---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index b86cbb7d0..401464579 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1092,7 +1092,7 @@ sub acceptLicense {
     $in->ask_from_({ title => N("License agreement"), 
 		    focus_first => 1,
 		     cancel => N("Quit"),
-		     messages => formatAlaTeX(messages::main_license() . "\n\n\n" . messages::warning_about_patents()),
+		     messages => formatAlaTeX(messages::main_license()),
 		     interactive_help_id => 'acceptLicense',
 		     callbacks => { ok_disabled => sub { $r eq 'Refuse' } },
 		   },
-- 
cgit v1.2.1