Use numeric comparison in sort for $displaynum (#2952)

Eg in the case of sockets:
- X0
- X99
- X100

X99 would be picked instead of X100.

diff --git a/testcases/lib/StartXServer.pm b/testcases/lib/StartXServer.pm
index 9d4e40c79a60742e0b965a90e0673d0dcc3772e6..49976394f2bc93a2f47474343da05a88396c3778 100644 (file)
--- a/testcases/lib/StartXServer.pm
+++ b/testcases/lib/StartXServer.pm
@@ -87,7 +87,7 @@ sub start_xserver {
 
     # First get the last used display number, then increment it by one.
     # Effectively falls back to 1 if no X server is running.
-    my ($displaynum) = map { /(\d+)$/ } reverse sort glob($x_socketpath . '*');
+    my ($displaynum) = reverse sort { $a <=> $b } map{ /(\d+)$/ } glob($x_socketpath . '*');
     $displaynum++;
 
     say "Starting $parallel Xephyr instances, starting at :$displaynum...";