From 7d681e91194e2e88c5e29be6e49714bc62cfcb70 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 21 May 2003 14:48:14 +0000
Subject: let simplify and speedup "strip first underscore" regexp

---
 control-center | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/control-center b/control-center
index 40dc8969..dc291edf 100755
--- a/control-center
+++ b/control-center
@@ -328,7 +328,7 @@ my ($menu, $factory) = create_factory_menu($window_global,
                                             ));
 
 %check_boxes = map {
-    $_ => $factory->get_widget("<main>" . join '', map { s/([^_]*)_(.*)/$1$2/; $_ } @{$options{$_}})
+    $_ => $factory->get_widget("<main>" . join '', map { s/_//; $_ } @{$options{$_}})
 } ("embedded_mode", "show_log", if_($::isWiz, "wiz_expert"));
 
 
-- 
cgit v1.2.1