master 63a03d5101: ; Fix bug#53367

[Michael Albinus]

branch: master
commit 63a03d510190e83debb65075feaaaa2328753923
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    ; Fix bug#53367
    
    * lisp/net/tramp.el (tramp-debug-buffer-command-completion-p):
    Handle small buffers.  (Bug#53367)
---
 lisp/net/tramp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 4c6a0bd964..b258121549 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -1930,7 +1930,7 @@ The outline level is equal to the verbosity of the Tramp 
message."
   "A predicate for Tramp interactive commands.
 They are completed by \"M-x TAB\" only in Tramp debug buffers."
   (with-current-buffer buffer
-    (string-equal (buffer-substring 1 10) ";; Emacs:")))
+    (string-equal (buffer-substring 1 (min 10 (point-max))) ";; Emacs:")))
 
 (put #'tramp-debug-buffer-command-completion-p 'tramp-suppress-trace t)