Fix socks test

* test/lisp/net/socks-tests.el (socks-tests-v4-basic): Fix failure
under native-comp (bug#51308).
This commit is contained in:
Lars Ingebrigtsen 2021-10-21 06:06:13 +02:00
parent 4540130312
commit 8002fcd4b9

View file

@ -203,7 +203,7 @@ Vectors must match verbatim. Strings are considered regex patterns.")
(should (equal host "example.com")) (should (equal host "example.com"))
(list 93 184 216 34))) (list 93 184 216 34)))
((symbol-function 'user-full-name) ((symbol-function 'user-full-name)
(lambda () "foo"))) (lambda (&optional _) "foo")))
(socks-tests-perform-hello-world-http-request))))) (socks-tests-perform-hello-world-http-request)))))
;; Replace first pattern below with ([5 3 0 1 2] . [5 2]) to validate ;; Replace first pattern below with ([5 3 0 1 2] . [5 2]) to validate