branch: elpa/helm
commit 36b0fa4eac0863e420201d7ece0ee32168c5be64
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Fix defcustom odd types warnings in emacs-29
---
helm-core.el | 6 +++---
helm-dabbrev.el | 2 +-
helm-misc.el | 2 +-
helm-utils.el | 2 +-
4 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/helm-core.el b/helm-core.el
index 948031b1ce..7190dc0687 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -470,7 +470,7 @@ into their execution process. See helm-grep.el for an
example."
:group 'helm
:type '(choice (const :tag "Ignore case" t)
(const :tag "Respect case" nil)
- (other :tag "Smart" 'smart)))
+ (other :tag "Smart" smart)))
(defcustom helm-file-name-case-fold-search
(if (memq system-type
@@ -770,8 +770,8 @@ this."
:group 'helm
:type '(choice
(symbol
- (const :tag "Fringe" 'left-fringe)
- (const :tag "Margin" 'left-margin))
+ (const :tag "Fringe" left-fringe)
+ (const :tag "Margin" left-margin))
integer))
(defcustom helm-tramp-connection-min-time-diff 5
diff --git a/helm-dabbrev.el b/helm-dabbrev.el
index 9d90ebeaae..bd1deb6653 100644
--- a/helm-dabbrev.el
+++ b/helm-dabbrev.el
@@ -106,7 +106,7 @@ initial search for all candidates in buffer(s)."
:group 'helm-dabbrev
:type '(choice (const :tag "Ignore case" t)
(const :tag "Respect case" nil)
- (other :tag "Smart" 'smart)))
+ (other :tag "Smart" smart)))
(defvaralias 'helm-dabbrev--regexp 'helm-dabbrev-separator-regexp)
(make-obsolete-variable 'helm-dabbrev--regexp
diff --git a/helm-misc.el b/helm-misc.el
index f70ca92f8a..5686aa046c 100644
--- a/helm-misc.el
+++ b/helm-misc.el
@@ -202,7 +202,7 @@ It is added to `extended-command-history'.
:group 'helm-misc
:type '(choice
(const :tag "Must match" t)
- (const :tag "Confirm" 'confirm)
+ (const :tag "Confirm" confirm)
(const :tag "Always allow" nil)))
(defcustom helm-minibuffer-history-key "C-r"
diff --git a/helm-utils.el b/helm-utils.el
index 2c88a86572..2d91de31e7 100644
--- a/helm-utils.el
+++ b/helm-utils.el
@@ -85,7 +85,7 @@ Possible value are:
(integer :tag "Match after"))
(const :tag "Match in line only" 0)
(integer :tag "Match after or before (+/-)")
- (const :tag "Never match" 'never)))
+ (const :tag "Never match" never)))
(defcustom helm-buffers-to-resize-on-pa nil
"A list of helm buffers where the helm-window should be reduced on PA.
