bex prun: One more mishandled error message

[bex.git] / lib / bin / bex-prun

diff --git a/lib/bin/bex-prun b/lib/bin/bex-prun
index c31c12524987c4d0436a8270a3c236ab1b660200..b7be1acd43bbdc2f633043a8b4a3d22018887654 100755 (executable)
--- a/lib/bin/bex-prun
+++ b/lib/bin/bex-prun
@@ -289,7 +289,7 @@ sub place_slot($) {
 
        if (defined $besti) {
                if ($best) {
-                       print STDERR "I: Replacing ", $best->{'Host'}, " (pri $bestpri)\n";
+                       print STDERR "I: Replacing ", $best->{'Host'}, " (pri $bestpri)\n" if $debug;
                        delete $best->{'Row'};
                }
                print STDERR "I: Allocated ", $s->{'Host'}, " \@$besti (pri $pri)\n" if $debug;