Merge pull request #38 from yours57/fix-org-block-composite-faceexternals/valign

Fix org-block detection for composite faces

1 files changed, 1 insertions, 1 deletions

diff --git a/valign.el b/valign.el
index cec7ce0..b7881ba 100644
--- a/valign.el
+++ b/valign.el
@@ -531,7 +531,7 @@ TYPE must be 'org.  Start at point, stop at LIMIT."
     (let ((face (plist-get (text-properties-at (point)) 'face)))
       ;; Don’t align tables in org blocks.
       (not (and (consp face)
-                (or (equal face '(org-block))
+                (or (memq 'org-block face)
                     (equal (plist-get face :inherit)
                            '(org-block))))))))