master abd3411827: Don't have edebug bug out if C-x is rebound

[Lars Ingebrigtsen]

branch: master
commit abd3411827d77edee6f2a38d9fc1c3a61fba88ed
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Don't have edebug bug out if C-x is rebound
    
    * lisp/emacs-lisp/edebug.el (edebug-global-prefix): Don't bug out
    if C-x has been rebound (bug#55607).
---
 lisp/emacs-lisp/edebug.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index f350aef8fb..9dc5a1315e 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -3865,7 +3865,10 @@ be installed in `emacs-lisp-mode-map'.")
 
 (define-obsolete-variable-alias 'global-edebug-prefix
   'edebug-global-prefix "28.1")
-(defvar edebug-global-prefix "\^XX"
+(defvar edebug-global-prefix
+  (when-let ((binding
+              (car (where-is-internal 'Control-X-prefix (list global-map)))))
+    (concat binding [?X]))
   "Prefix key for global edebug commands, available from any buffer.")
 
 (define-obsolete-variable-alias 'global-edebug-map