diff options
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/trampver.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el index 0a92e0d3202..8d21133b3b1 100644 --- a/lisp/net/trampver.el +++ b/lisp/net/trampver.el | |||
| @@ -48,6 +48,7 @@ | |||
| 48 | ;; Suppress message from `emacs-repository-get-branch'. We must | 48 | ;; Suppress message from `emacs-repository-get-branch'. We must |
| 49 | ;; also handle out-of-tree builds. | 49 | ;; also handle out-of-tree builds. |
| 50 | (let ((inhibit-message t) | 50 | (let ((inhibit-message t) |
| 51 | (debug-on-error nil) | ||
| 51 | (dir (or (locate-dominating-file (locate-library "tramp") ".git") | 52 | (dir (or (locate-dominating-file (locate-library "tramp") ".git") |
| 52 | source-directory))) | 53 | source-directory))) |
| 53 | ;; `emacs-repository-get-branch' has been introduced with Emacs 27.1. | 54 | ;; `emacs-repository-get-branch' has been introduced with Emacs 27.1. |
| @@ -61,6 +62,7 @@ | |||
| 61 | ;; Suppress message from `emacs-repository-get-version'. We must | 62 | ;; Suppress message from `emacs-repository-get-version'. We must |
| 62 | ;; also handle out-of-tree builds. | 63 | ;; also handle out-of-tree builds. |
| 63 | (let ((inhibit-message t) | 64 | (let ((inhibit-message t) |
| 65 | (debug-on-error nil) | ||
| 64 | (dir (or (locate-dominating-file (locate-library "tramp") ".git") | 66 | (dir (or (locate-dominating-file (locate-library "tramp") ".git") |
| 65 | source-directory))) | 67 | source-directory))) |
| 66 | (and (stringp dir) (file-directory-p dir) | 68 | (and (stringp dir) (file-directory-p dir) |