[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 3baac35b55 1/3: Don't quote symbols in defcustom ty
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 3baac35b55 1/3: Don't quote symbols in defcustom types |
Date: |
Tue, 14 Jun 2022 10:02:10 -0400 (EDT) |
branch: externals/org
commit 3baac35b5592675dfea42fe4b722821595f57557
Author: Robert Pluim <rpluim@gmail.com>
Commit: Daniel Fleischer <danflscr@gmail.com>
Don't quote symbols in defcustom types
* lisp/org-fold-core.el (org-fold-core-style):
* lisp/org-persist.el (org-persist-remote-files):
(org-persist-default-expiry):
Don't quote the symbol given as value for a const.
---
lisp/org-fold-core.el | 4 ++--
lisp/org-persist.el | 4 ++--
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/lisp/org-fold-core.el b/lisp/org-fold-core.el
index 5dda133fba..3ba63b7259 100644
--- a/lisp/org-fold-core.el
+++ b/lisp/org-fold-core.el
@@ -302,8 +302,8 @@ less error-prone."
:group 'org
:package-version '(Org . "9.6")
:type '(choice
- (const :tag "Overlays" 'overlays)
- (const :tag "Text properties" 'text-properties)))
+ (const :tag "Overlays" overlays)
+ (const :tag "Text properties" text-properties)))
(defvar-local org-fold-core-isearch-open-function
#'org-fold-core--isearch-reveal
"Function used to reveal hidden text found by isearch.
diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 068f58cec7..ab13652202 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -196,7 +196,7 @@ password prompts to log in."
:type '(choice (const :tag "Never" nil)
(const :tag "Always" t)
(number :tag "Keep not more than X files")
- (const :tag "Check if exist on remote" 'check-existence)))
+ (const :tag "Check if exist on remote" check-existence)))
(defcustom org-persist-default-expiry 30
"Default expiry condition for persistent data.
@@ -207,7 +207,7 @@ data is deleted that number days after last access. When a
function,
it should be a function returning non-nil when the data is expired. The
function will be called with a single argument - collection."
:group 'org-persist
- :type '(choice (const :tag "Never" 'never)
+ :type '(choice (const :tag "Never" never)
(const :tag "Always" nil)
(number :tag "Keep N days")
(function :tag "Function")))