From 459eedd7dc7ef289f379d2fc1dc691a057d1e144 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 18 Nov 2004 13:25:45 +0000 Subject: remove some unneeded ";", add some for normalization (as told by perl_checker) --- perl-install/Xconfig/screen.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig') diff --git a/perl-install/Xconfig/screen.pm b/perl-install/Xconfig/screen.pm index 89e416a4d..e0a3ebd64 100644 --- a/perl-install/Xconfig/screen.pm +++ b/perl-install/Xconfig/screen.pm @@ -19,7 +19,7 @@ sub configure { my @sections = mapn { my ($device, $monitor) = @_; - { Device => $device->{Identifier}, Monitor => $monitor->{Identifier} } + { Device => $device->{Identifier}, Monitor => $monitor->{Identifier} }; } \@devices, \@monitors; $raw_X->set_screens(@sections); -- cgit v1.2.1