Merge from origin/emacs-26

7296b6f Improve cl-do, cl-do* docstrings
d416109 Avoid returning early in 'while-no-input' due to subprocesses
e8a4d94 Cleanup when opening a new terminal fails. (Bug#32794)

# Conflicts:
#	etc/NEWS

1 files changed, 1 insertions, 0 deletions

diff --git a/src/term.c b/src/term.c
index ce24f6915fc..852dc23bd60 100644
--- a/src/term.c
+++ b/src/term.c
@@ -4008,6 +4008,7 @@ init_tty (const char *name, const char *terminal_type, bool must_succeed)
         char const *diagnostic
           = (fd < 0) ? "Could not open file: %s" : "Not a tty device: %s";
         emacs_close (fd);
+        delete_terminal_internal (terminal);
         maybe_fatal (must_succeed, terminal, diagnostic, diagnostic, name);
       }