Fixed rhbz#460153

dejagnu-1.4.4-runtest.patch

@@ -0,0 +1,12 @@
+--- dejagnu-orig/runtest.exp	2008-08-23 20:20:24.000000000 +0200
++++ dejagnu/runtest.exp	2008-08-23 20:25:44.000000000 +0200
+@@ -1443,8 +1443,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.4.4
-Release: 11%{?dist}
+Release: 12%{?dist}
 Epoch: 1
 License: GPLv2+
 Source: ftp://ftp.gnu.org/gnu/dejagnu/dejagnu-%{version}.tar.gz
@@ -14,6 +14,7 @@ BuildArch: noarch
 BuildRequires: expect screen texinfo
 Patch1: dejagnu-1.4.4-smp-1.patch
 Patch3: dejagnu-1.4.4-testsuite.patch
+Patch4: dejagnu-1.4.4-runtest.patch
 
 %description
 DejaGnu is an Expect/Tcl based framework for testing other programs.
@@ -27,6 +28,7 @@ into software development).
 %setup -q
 %patch1 -p1
 %patch3 -p1
+%patch4 -p1
 
 %build
 %configure -v
@@ -74,6 +76,10 @@ rm -rf $RPM_BUILD_ROOT
 %{_infodir}/*
 
 %changelog
+* Wed Aug 27 2008 Jiri Moskovcak <jmoskovc@redhat.com> - 1:1.4.4-12
+- fixed runtest (patch from jan.kratochvil@redhat.com)
+- Resolves: #460153
+
 * Mon Nov 12 2007 Petr Machata <pmachata@redhat.com> - 1:1.4.4-11
 - Install info file.
 - Resolves: #230652