]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix Tramp test
authorMichael Albinus <michael.albinus@gmx.de>
Thu, 4 Aug 2022 09:59:18 +0000 (11:59 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Thu, 4 Aug 2022 09:59:18 +0000 (11:59 +0200)
* test/lisp/net/tramp-tests.el (tramp-test48-unload):
Ignore autoload functions in `tramp-file-name' structure tests,
since `tramp-file-name-handler' is also autoloaded.

test/lisp/net/tramp-tests.el

index 63ccd05a263bbde7936e66d6212a63ed6378fc18..e2d4ed781bbc493778e69357b1a4f03c7fc2c1e8 100644 (file)
@@ -7590,7 +7590,7 @@ Since it unloads Tramp, it shall be the last test to run."
   (should-not (cl--find-class 'tramp-file-name))
   (mapatoms
    (lambda (x)
-     (and (functionp x)
+     (and (functionp x) (null (autoloadp (symbol-function x)))
           (string-match-p "tramp-file-name" (symbol-name x))
           (ert-fail (format "Structure function `%s' still exists" x)))))