]> git.eshelyaron.com Git - emacs.git/commitdiff
Make async connect_network_socket failures use Qfailed
authorLars Ingebrigtsen <larsi@gnus.org>
Sun, 6 Feb 2022 23:26:25 +0000 (00:26 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Sun, 6 Feb 2022 23:26:25 +0000 (00:26 +0100)
* src/process.c (connect_network_socket): Mark the process as
Qfailed instead of using the error symbol (since this is what's
defined for the status) (bug#53814).

src/process.c

index 7c7f60828493316171dce514e255fb3d941020db..e9125953935ece0ce176c15533cb5795aea68d60 100644 (file)
@@ -3599,7 +3599,7 @@ connect_network_socket (Lisp_Object proc, Lisp_Object addrinfos,
        {
          Lisp_Object data = get_file_errno_data (err, contact, xerrno);
 
-         pset_status (p, list2 (Fcar (data), Fcdr (data)));
+         pset_status (p, list2 (Qfailed, data));
          unbind_to (count, Qnil);
          return;
        }