Testcases: rename StartXDummy to StartXServer

Rename the package StartXDummy to StartXServer in the testcases library
because XDummy is no longer used.

No logic changes.
This commit is contained in:
Tony Crisci 2014-10-04 15:01:22 -04:00 committed by Michael Stapelberg
parent 6ba7728136
commit ecca0baff3
2 changed files with 4 additions and 4 deletions

View File

@ -19,7 +19,7 @@ use Time::HiRes qw(time);
use IO::Handle; use IO::Handle;
# these are shipped with the testsuite # these are shipped with the testsuite
use lib qw(lib); use lib qw(lib);
use StartXDummy; use StartXServer;
use StatusLine; use StatusLine;
use TestWorker; use TestWorker;
# the following modules are not shipped with Perl # the following modules are not shipped with Perl
@ -133,7 +133,7 @@ for my $display (@displays) {
# Read previous timing information, if available. We will be able to roughly # Read previous timing information, if available. We will be able to roughly
# predict the test duration and schedule a good order for the tests. # predict the test duration and schedule a good order for the tests.
my $timingsjson = StartXDummy::slurp('.last_run_timings.json'); my $timingsjson = StartXServer::slurp('.last_run_timings.json');
%timings = %{decode_json($timingsjson)} if length($timingsjson) > 0; %timings = %{decode_json($timingsjson)} if length($timingsjson) > 0;
# Re-order the files so that those which took the longest time in the previous # Re-order the files so that those which took the longest time in the previous
@ -222,7 +222,7 @@ printf("\t%s with %.2f seconds\n", $_, $timings{$_})
if ($numtests == 1) { if ($numtests == 1) {
say ''; say '';
say 'Test output:'; say 'Test output:';
say StartXDummy::slurp($logfile); say StartXServer::slurp($logfile);
} }
END { cleanup() } END { cleanup() }

View File

@ -1,4 +1,4 @@
package StartXDummy; package StartXServer;
# vim:ts=4:sw=4:expandtab # vim:ts=4:sw=4:expandtab
use strict; use strict;