Description of problem:
I have this simple script
# cat test.exp
#!/usr/bin/expect -d
set timeout 60
spawn login
expect -nocase {login} {send "eal\r"}
expect -nocase {password} {send "fo0m4nchU\r"}
expect -nocase {level} {send "\r"}
send "PS1=:\\::\r"
expect {:::$} {send "exit\r"}
expect {:::$} {close; wait}'

On RHEL6 it works well:
-----------------------
# ./test.exp
expect version 5.44.1.15
argv[0] = /usr/bin/expect  argv[1] = -d  argv[2] = ./test.exp  
set argc 0
set argv0 "./test.exp"
set argv ""
executing commands from command file ./test.exp
spawn login
parent: waiting for sync byte
parent: telling child to go ahead
parent: now unsynchronized from child
spawn: returns {21762}

expect: does "" (spawn_id exp4) match glob pattern "login"? no
login: 
expect: does "login: " (spawn_id exp4) match glob pattern "login"? yes
expect: set expect_out(0,string) "login"
expect: set expect_out(spawn_id) "exp4"
expect: set expect_out(buffer) "login"
send: sending "eal\r" to { exp4 }
[snip]

On RHEL7 it fails:
------------------
# ./test.exp 
expect version 5.45
argv[0] = /usr/bin/expect  argv[1] = -d  argv[2] = ./test.exp  
set argc 0
set argv0 "./test.exp"
set argv ""
executing commands from command file ./test.exp
spawn login
parent: waiting for sync byte
parent: telling child to go ahead
parent: now unsynchronized from child
spawn: returns {18543}

expect: does "" (spawn_id exp4) match glob pattern "login"? no
expect: read eof
expect: set expect_out(spawn_id) "exp4"
expect: set expect_out(buffer) ""
expect: spawn id exp4 not open
    while executing
"expect -nocase {password} {send "fo0m4nchU\r"}"
    (file "./test.exp" line 5)

Version-Release number of selected component (if applicable):
util-linux-2.23-0.3.el7.x86_64
expect-5.45-8.el7.x86_64

How reproducible:
100%

Steps to Reproduce:
1. execute test.exp script
  
Actual results:
On RHEL7 the expect reads eof. In strace I see:
select(5, [4], [], [4], {59, 999888})   = 1 (in [4], left {59, 997051})
gettimeofday({1365518725, 918093}, NULL) = 0
read(4, 0x127cb98, 4096)                = -1 EIO (Input/output error)
write(2, "expect: read eof\r\n", 18expect: read eof^M
[snip]

Expected results:
Script works as on RHEL6

Additional info:
The workaround I'm using now is to use sleep 1 after the spawn