Remove unused variable.

diff --git a/src/tests/tests.pm b/src/tests/tests.pm
index 7d0777c4ff24b6d8b9861cd636731ca526f19a04..01259dd2b7e6b27628945339a64be895631becf2 100644 (file)
--- a/src/tests/tests.pm
+++ b/src/tests/tests.pm
@@ -8,7 +8,6 @@ sub pass;
 
 die if @ARGV != 2;
 our ($test, $src_dir) = @ARGV;
-our ($src_stem) = "$src_dir/$test";
 
 my ($msg_file) = tempfile ();
 select ($msg_file);