diff options
| author | Stefan Monnier | 2025-09-10 11:13:45 +0200 |
|---|---|---|
| committer | Michael Albinus | 2025-09-10 11:13:45 +0200 |
| commit | 014036980e9d98ce7c2b8d75762fb6a60ca61329 (patch) | |
| tree | 1c77f651af5f477e90808e8bf6e56590d22e3c20 | |
| parent | a060bdec820b2ec20d62b77df6d55b54b91cd81b (diff) | |
| download | emacs-014036980e9d98ce7c2b8d75762fb6a60ca61329.tar.gz emacs-014036980e9d98ce7c2b8d75762fb6a60ca61329.zip | |
; * lisp/net/tramp-compat.el (top): Use read syntax #' for `functionp'.
| -rw-r--r-- | lisp/net/tramp-compat.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/tramp-compat.el b/lisp/net/tramp-compat.el index feda8943be5..5d463bc0062 100644 --- a/lisp/net/tramp-compat.el +++ b/lisp/net/tramp-compat.el | |||
| @@ -229,7 +229,7 @@ value is the default binding of the variable." | |||
| 229 | (cdr result) | 229 | (cdr result) |
| 230 | ,variable))))) | 230 | ,variable))))) |
| 231 | 231 | ||
| 232 | (dolist (elt (all-completions "tramp-compat-" obarray 'functionp)) | 232 | (dolist (elt (all-completions "tramp-compat-" obarray #'functionp)) |
| 233 | (function-put (intern elt) 'tramp-suppress-trace t)) | 233 | (function-put (intern elt) 'tramp-suppress-trace t)) |
| 234 | 234 | ||
| 235 | (add-hook 'tramp-unload-hook | 235 | (add-hook 'tramp-unload-hook |