From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 25 May 2021 20:31:00 +0000 (+0200)
Subject: Make hs-set-up-overlay into user option
X-Git-Tag: emacs-28.0.90~2329
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b75db97f3168ac55986d1f8ed9861646e16486bb;p=emacs.git

Make hs-set-up-overlay into user option

* lisp/progmodes/hideshow.el (hs-set-up-overlay): Make into
defcustom (bug#48513).
---

diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 81ba0d86954..b2557587c6c 100644
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -310,7 +310,7 @@ a block), `hs-hide-all', `hs-hide-block' and `hs-hide-level'.")
 These commands include the toggling commands (when the result is to show
 a block), `hs-show-all' and `hs-show-block'.")
 
-(defvar hs-set-up-overlay #'ignore
+(defcustom hs-set-up-overlay #'ignore
   "Function called with one arg, OV, a newly initialized overlay.
 Hideshow puts a unique overlay on each range of text to be hidden
 in the buffer.  Here is a simple example of how to use this variable:
@@ -326,7 +326,9 @@ in the buffer.  Here is a simple example of how to use this variable:
 
 This example shows how to get information from the overlay as well
 as how to set its `display' property.  See `hs-make-overlay' and
-info node `(elisp)Overlays'.")
+info node `(elisp)Overlays'."
+  :type 'function
+  :version "28.1")
 
 ;;---------------------------------------------------------------------------
 ;; internal variables