diff options
author | Eelco Dolstra <e.dolstra@tudelft.nl> | 2010-02-04 02:05:22 +0000 |
---|---|---|
committer | Eelco Dolstra <e.dolstra@tudelft.nl> | 2010-02-04 02:05:22 +0000 |
commit | 3cfe65e516a75696addcf0281674f644a0933ea5 (patch) | |
tree | 4bb5f30d5874eb90133c8ee0e58cf470bba1ac08 /scripts/ssh.pm | |
parent | e51a276907f46daf8dbc177829f8db05c0e43372 (diff) | |
download | guix-3cfe65e516a75696addcf0281674f644a0933ea5.tar.gz |
* Doh! Calling `system' in an END block causes the exit status in $?
to be changed to 0.
Diffstat (limited to 'scripts/ssh.pm')
-rw-r--r-- | scripts/ssh.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/ssh.pm b/scripts/ssh.pm index cea486675e..233c5a4aa7 100644 --- a/scripts/ssh.pm +++ b/scripts/ssh.pm @@ -32,6 +32,6 @@ sub closeSSHConnection { } } -END { closeSSHConnection; } +END { my $saved = $?; closeSSHConnection; $? = $saved; } return 1; |