From 2d78714f44c2989d5304b26626f9e0bf4dfb582c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 29 Aug 2008 13:51:31 +0000
Subject: (asteriskize_if_needed) factorize code for next commits

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

(limited to 'perl-install/interactive/gtk.pm')

diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index 7b6e19f9a..1898726ca 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -711,7 +711,7 @@ sub create_widgets {
     # add asterisks before titles when there're more than one:
     my @all_titles = all_title_entries($l);
     if (2 <= @all_titles) {
-        ${$_->{val}} = "\x{2022} " . ${$_->{val}} foreach @all_titles;
+        ${$_->{val}} = mygtk2::asteriskize_if_needed(${$_->{val}}) foreach @all_titles;
     }
 
     my $box = create_widgets_block($o, $l, $update, \$ignore);
-- 
cgit v1.2.1