Re-apply dejagnu-1.6-runtest.patch

Resolves: #1990804

dejagnu-1.6-runtest.patch

@@ -0,0 +1,12 @@
+--- dejagnu-1.6.1/runtest.exp.orig	2017-10-16 07:43:20.000000000 -0400
++++ dejagnu-1.6.1/runtest.exp	2021-08-11 10:54:51.172965763 -0400
+@@ -1444,8 +1444,7 @@ proc runtest { test_file_name } {
+     global tool
+ 
+     clone_output "Running $test_file_name ..."
+-    set prms_id	0
+-    set bug_id	0
++    reset_vars
+     set test_result ""
+ 
+     if {[file exists $test_file_name]} {

dejagnu.spec

@@ -1,7 +1,7 @@
 Summary: A front end for testing other programs
 Name: dejagnu
 Version: 1.6.1
-Release: 12%{?dist}
+Release: 13%{?dist}
 Epoch: 1
 License: GPLv3+
 Source: ftp://ftp.gnu.org/gnu/dejagnu/dejagnu-%{version}.tar.gz
@@ -13,6 +13,8 @@ BuildRequires:  gcc-c++
 BuildRequires: expect texinfo
 BuildRequires: make
 
+Patch0: dejagnu-1.6-runtest.patch
+
 %description
 DejaGnu is an Expect/Tcl based framework for testing other programs.
 DejaGnu has several purposes: to make it easy to write tests for any
@@ -23,6 +25,7 @@ into software development).
 
 %prep
 %setup -q
+%patch0 -p1 -b .runtest~
 
 %build
 %configure -v
@@ -59,6 +62,9 @@ install -D -m 644 doc/dejagnu.info $RPM_BUILD_ROOT/%{_infodir}/%{name}.info
 %{_infodir}/dejagnu*
 
 %changelog
+* Wed Aug 11 2021 Marek Polacek <polacek@redhat.com> - 1:1.6.1-13
+- re-apply dejagnu-1.6-runtest.patch (#1990804)
+
 * Mon Aug 09 2021 Mohan Boddu <mboddu@redhat.com> - 1:1.6.1-12
 - Rebuilt for IMA sigs, glibc 2.34, aarch64 flags
   Related: rhbz#1991688