[elpa] externals/modus-operandi-theme d09ba39 094/153: Use internal function for org-quote styling

[Stefan Monnier]

branch: externals/modus-operandi-theme
commit d09ba390f13673039e218be1ef806a0170e55e51
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Use internal function for org-quote styling
---
 modus-operandi-theme.el | 6 +-----
 modus-vivendi-theme.el  | 6 +-----
 2 files changed, 2 insertions(+), 10 deletions(-)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 4aa94e4..ea47ba0 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -3582,11 +3582,7 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(org-priority ((,class :box ,bg-region :background ,bg-dim :foreground 
,magenta
                            :inherit ,modus-theme-variable-pitch)))
    `(org-property-value ((,class :inherit fixed-pitch :foreground 
,cyan-alt-other)))
-   `(org-quote ((,class ,@(if modus-operandi-theme-org-blocks
-                              (append
-                               (and (>= emacs-major-version 27) '(:extend t))
-                               (list :background bg-dim))
-                            (list :background nil))
+   `(org-quote ((,class ,@(modus-operandi-theme-org-block bg-dim)
                         :foreground ,fg-special-calm :slant 
,modus-theme-slant)))
    `(org-scheduled ((,class :foreground ,fg-special-warm)))
    `(org-scheduled-previously ((,class :foreground ,yellow-alt-other)))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index ed7e808..fde5064 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -3582,11 +3582,7 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(org-priority ((,class :box ,bg-region :background ,bg-dim :foreground 
,magenta
                            :inherit ,modus-theme-variable-pitch)))
    `(org-property-value ((,class :inherit fixed-pitch :foreground 
,cyan-alt-other)))
-   `(org-quote ((,class ,@(if modus-vivendi-theme-org-blocks
-                              (append
-                               (and (>= emacs-major-version 27) '(:extend t))
-                               (list :background bg-dim))
-                            (list :background nil))
+   `(org-quote ((,class ,@(modus-vivendi-theme-org-block bg-dim)
                         :foreground ,fg-special-calm :slant 
,modus-theme-slant)))
    `(org-scheduled ((,class :foreground ,fg-special-warm)))
    `(org-scheduled-previously ((,class :foreground ,yellow-alt-other)))