[Emacs-diffs] master 235ca1b 2/2: Make xref-show-xrefs-function a defcustom

[Lars Ingebrigtsen]

branch: master
commit 235ca1b4dbfd42380117d58801de6b8f6b48a4f9
Author: Fritz Stelzer <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Make xref-show-xrefs-function a defcustom
    
    * lisp/progmodes/xref.el (xref-show-xrefs-function): Make into a
    defcustome (bug#29206).
    
    * lisp/progmodes/xref.el (xref-show-definitions-function): Ditto.
    
    Copyright-paperwork-exempt: yes
---
 lisp/progmodes/xref.el | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index 8769641..44934d4 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -875,7 +875,7 @@ local keymap that binds `RET' to `xref-quit-and-goto-xref'."
         (current-buffer))))))
 
 
-(defvar xref-show-xrefs-function 'xref--show-xref-buffer
+(defcustom xref-show-xrefs-function 'xref--show-xref-buffer
   "Function to display a list of search results.
 
 It should accept two arguments: FETCHER and ALIST.
@@ -891,12 +891,14 @@ command was called.
 
 DISPLAY-ACTION indicates where the target location should be
 displayed.  The possible values are nil, `window' meaning the
-other window, or `frame' meaning the other frame.")
+other window, or `frame' meaning the other frame."
+  :type 'function)
 
-(defvar xref-show-definitions-function 'xref--show-defs-buffer
+(defcustom xref-show-definitions-function 'xref--show-defs-buffer
   "Function to display a list of definitions.
 
-Accepts the same arguments as `xref-show-xrefs-function'.")
+Accepts the same arguments as `xref-show-xrefs-function'."
+  :type 'function)
 
 (defvar xref--read-identifier-history nil)