pgplot: use testpath

This commit is contained in:
Adam Vandenberg 2013-06-13 08:49:58 -07:00
parent e876d7ef49
commit e5394165ae

View file

@ -103,16 +103,13 @@ EOS
end
test do
File.open('test_pgplot', 'w') do |t|
t.write(<<-EOS
spawn #{prefix}/examples/pgdemo1
expect {
NULL {send "/XWINDOW\n"; exp_continue}
RETURN {send "\n"; exp_continue}
}
EOS
)
end
(testpath/'test_pgplot').write <<-EOS.undent
spawn #{prefix}/examples/pgdemo1
expect {
NULL {send "/XWINDOW\n"; exp_continue}
RETURN {send "\n"; exp_continue}
}
EOS
system "expect test_pgplot; killall pgxwin_server"
end
end