From 6e4c96c69fb585a871b8447a47960993f6e622d1 Mon Sep 17 00:00:00 2001
From: Jiří Moskovčák <jmoskovc@fedoraproject.org>
Date: Aug 27 2008 13:39:26 +0000
Subject: Fixed rhbz#460153


---

diff --git a/dejagnu-1.4.4-runtest.patch b/dejagnu-1.4.4-runtest.patch
new file mode 100644
index 0000000..0f1ff31
--- /dev/null
+++ b/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]} {
diff --git a/dejagnu.spec b/dejagnu.spec
index 2365f79..5a7e895 100644
--- a/dejagnu.spec
+++ b/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