From: Eshel Yaron <me@eshelyaron.com>
Date: Sun, 5 Feb 2023 09:41:15 +0000 (+0200)
Subject: * (sweeprolog-rename-variable-allow-existing): refine custom type
X-Git-Tag: V9.1.4-sweep-0.16.0~7
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=66fc2a10602674171e2bc17f312e167d4f7c0c49;p=dict.git

* (sweeprolog-rename-variable-allow-existing): refine custom type
---

diff --git a/sweeprolog.el b/sweeprolog.el
index fcb4c85..1041a4e 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -392,7 +392,9 @@ token via its `help-echo' text property."
 If it is the symbol `confirm', allow but ask for confirmation
 first."
   :package-version '((sweeprolog "0.15.1"))
-  :type 'symbol
+  :type '(choice (const :tag "Allow"   t)
+                 (const :tag "Confirm" confirm)
+                 (const :tag "Refuse"  nil))
   :group 'sweeprolog)
 
 ;;;; Keymaps