--- t/02_sections.t
+++ t/02_sections.t
@@ -6,7 +6,11 @@ BEGIN { unshift @INC, './lib', '../lib';
 
 $test = 0;
 $| = 1;
-my %sec = qw(1 max 2 lift 3 erfc 4 factorint 5 elleta 6 idealnorm 7 polresultant 8 matrank 9 sumalt 10 ploth 11 forstep); # 2.3.5
+if ($ENV{MP_NOGNUPLOT}) {
+  my %sec = qw(1 max 2 lift 3 erfc 4 factorint 5 elleta 6 idealnorm 7 polresultant 8 matrank 9 sumalt 11 forstep); # 2.3.5
+} else {
+  my %sec = qw(1 max 2 lift 3 erfc 4 factorint 5 elleta 6 idealnorm 7 polresultant 8 matrank 9 sumalt 10 ploth 11 forstep); # 2.3.5
+}
 my $secs = keys %sec;
 my $mx = 10;
 $mx < $_ and $mx = $_ for keys %sec;
--- test_eng/Testout.pm
+++ test_eng/Testout.pm
@@ -70,6 +70,11 @@ my $DEFAULT = undef;
 
 if ($file =~ /plot|graph|all/) {
   if ($ENV{MP_NOGNUPLOT}) {
+    @not_yet_defined{qw(
+      plotbox plotcolor plotcursor plotdraw ploth plothraw plotinit plotlines
+      plotmove plotpoints plotrline plotrmove plotrpoint psdraw psploth
+      psplothraw plotscale plotkill
+    )} = (1) x 10000;
     $skip_gnuplot = 1;
   } else {
     eval { link_gnuplot() };