[elpa] externals/corfu 44df3d98b7: Use natnum custom type (supported by Compat 29.1.4.0)

[ELPA Syncer]

branch: externals/corfu
commit 44df3d98b7ef5b2e745124ea46c761fca9760140
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Use natnum custom type (supported by Compat 29.1.4.0)
---
 corfu.el                      | 12 ++++++------
 extensions/corfu-history.el   |  2 +-
 extensions/corfu-indexed.el   |  2 +-
 extensions/corfu-popupinfo.el |  8 ++++----
 4 files changed, 12 insertions(+), 12 deletions(-)

diff --git a/corfu.el b/corfu.el
index d41df3a1fb..7d9c247a64 100644
--- a/corfu.el
+++ b/corfu.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Daniel Mendler <mail@daniel-mendler.de>
 ;; Created: 2021
 ;; Version: 0.35
-;; Package-Requires: ((emacs "27.1") (compat "29.1.3.4"))
+;; Package-Requires: ((emacs "27.1") (compat "29.1.4.0"))
 ;; Homepage: https://github.com/minad/corfu
 
 ;; This file is part of GNU Emacs.
@@ -50,20 +50,20 @@
 
 (defcustom corfu-count 10
   "Maximal number of candidates to show."
-  :type 'integer)
+  :type 'natnum)
 
 (defcustom corfu-scroll-margin 2
   "Number of lines at the top and bottom when scrolling.
 The value should lie between 0 and corfu-count/2."
-  :type 'integer)
+  :type 'natnum)
 
 (defcustom corfu-min-width 15
   "Popup minimum width in characters."
-  :type 'integer)
+  :type 'natnum)
 
 (defcustom corfu-max-width 100
   "Popup maximum width in characters."
-  :type 'integer)
+  :type 'natnum)
 
 (defcustom corfu-cycle nil
   "Enable cycling for `corfu-next' and `corfu-previous'."
@@ -160,7 +160,7 @@ return a string, possibly an icon."
   "Minimum length of prefix for auto completion.
 The completion backend can override this with
 :company-prefix-length."
-  :type 'integer)
+  :type 'natnum)
 
 (defcustom corfu-auto-delay 0.2
   "Delay for auto completion."
diff --git a/extensions/corfu-history.el b/extensions/corfu-history.el
index 4046ae6684..4a568309f6 100644
--- a/extensions/corfu-history.el
+++ b/extensions/corfu-history.el
@@ -43,7 +43,7 @@
 
 (defcustom corfu-history-length nil
   "Corfu history length."
-  :type '(choice (const nil) integer)
+  :type '(choice (const nil) natnum)
   :group 'corfu)
 
 (defvar corfu-history--hash nil
diff --git a/extensions/corfu-indexed.el b/extensions/corfu-indexed.el
index 4143e6bf32..691c55d7b6 100644
--- a/extensions/corfu-indexed.el
+++ b/extensions/corfu-indexed.el
@@ -50,7 +50,7 @@
 (defcustom corfu-indexed-start 0
   "Start of the indexing."
   :group 'corfu
-  :type 'integer)
+  :type 'natnum)
 
 (defvar corfu-indexed--commands
   '(corfu-insert corfu-complete)
diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el
index f2ecde2f02..8bf7405a6a 100644
--- a/extensions/corfu-popupinfo.el
+++ b/extensions/corfu-popupinfo.el
@@ -76,22 +76,22 @@ popup can be requested manually via 
`corfu-popupinfo-toggle',
 
 (defcustom corfu-popupinfo-max-width 80
   "The maximum width of the info popup in characters."
-  :type 'integer
+  :type 'natnum
   :group 'corfu)
 
 (defcustom corfu-popupinfo-min-width 30
   "The minimum width of the info popup in characters."
-  :type 'integer
+  :type 'natnum
   :group 'corfu)
 
 (defcustom corfu-popupinfo-max-height 10
   "The maximum height of the info popup in characters."
-  :type 'integer
+  :type 'natnum
   :group 'corfu)
 
 (defcustom corfu-popupinfo-min-height 1
   "The minimum height of the info popup in characters."
-  :type 'integer
+  :type 'natnum
   :group 'corfu)
 
 (defcustom corfu-popupinfo-resize t