diff options
-rw-r--r-- | perl-install/Xconfig/xfree4.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/Xconfig/xfree4.pm b/perl-install/Xconfig/xfree4.pm index 8ffa411e0..3045bd697 100644 --- a/perl-install/Xconfig/xfree4.pm +++ b/perl-install/Xconfig/xfree4.pm @@ -116,7 +116,7 @@ sub new_screen_sections { get_ServerLayout($raw_X)->{Screen} = [ { val => qq("screen1") }, #-) - map { { val => sprintf('"screen%d" RightOf "screen%d"', $_-1, $_) } } (2 .. $nb_new) + map { { val => sprintf('"screen%d" RightOf "screen%d"', $_, $_ - 1) } } (2 .. $nb_new) ]; @l; |