From: Eshel Yaron <me@eshelyaron.com>
Date: Thu, 17 Aug 2023 21:28:45 +0000 (+0200)
Subject: Use 'natnum' custom type
X-Git-Tag: V9.1.14-sweep-0.23.0~7
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b2470c020b6afaada02b7140ee7be27f171cceb9;p=sweep.git

Use 'natnum' custom type

* sweeprolog.el (sweeprolog-indent-offset):
(sweeprolog-analyze-buffer-max-size):
(sweeprolog-pack-description-max-width): Update type to 'natnum'.
---

diff --git a/sweeprolog.el b/sweeprolog.el
index 5e2699c..cd25357 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -144,7 +144,7 @@ notices with the module header."
 (defcustom sweeprolog-indent-offset 4
   "Number of columns to indent with in `sweeprolog-mode' buffers."
   :package-version '((sweeprolog . "0.3.1"))
-  :type 'integer
+  :type 'natnum
   :group 'sweeprolog)
 
 (defcustom sweeprolog-qq-mode-alist '(("graphql"    . graphql-mode)
@@ -182,7 +182,7 @@ This makes the first invocation of \\[cycle-spacing] in
 (defcustom sweeprolog-analyze-buffer-max-size 100000
   "Maximum buffer size to analyze on idle."
   :package-version '((sweeprolog . "0.8.2"))
-  :type 'integer
+  :type 'natnum
   :group 'sweeprolog)
 
 (make-obsolete-variable 'sweeprolog-colourise-buffer-max-size
@@ -505,7 +505,7 @@ This is an integer specifying a string width at which
 `sweeprolog-pack-install' truncates pack descriptions annotating
 pack completion candidates."
   :package-version '((sweeprolog "0.22.2"))
-  :type 'integer)
+  :type 'natnum)
 
 ;;;; Keymaps