fixed wrong usage of Screen keyword in Device section, should be present and

reseted for any multi head card with only one BusID.

1 files changed, 4 insertions, 3 deletions

diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index ac37ffec3..3959241b5 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm
@@ -180,6 +180,7 @@ sub cardConfigurationAuto() {
 		       foreach (1..$dup) {
 			   my $card = {};
 			   add2hash($card, $orig);
+			   $card->{screen} = $_ - 1;
 			   push @result, $card;
 		       }
 		       @result;
@@ -190,11 +191,11 @@ sub cardConfigurationAuto() {
     #- make sure no type are already used, duplicate both screen
     #- and rename type (because used as id).
     if (@cards > 1) {
-	my $screen = 0;
+	my $card = 1;
 	foreach (@cards) {
 	    updateCardAccordingName($_, $_->{type}) if $_->{type};
-	    $_->{screen} = $screen++;
-	    $_->{type} = "$_->{type} $screen";
+	    $_->{type} = "$_->{type} $card";
+	    $card++;
 	}
     }
     #- in case of only one cards, remove all busid reference, this will avoid