[elpa] externals/org-modern 34b36df5b7 30/65: Use two different space objects

[ELPA Syncer]

branch: externals/org-modern
commit 34b36df5b7d57826d62b9494a2a203b80846890a
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Use two different space objects
---
 org-modern.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/org-modern.el b/org-modern.el
index dcda258c58..135300b751 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -362,6 +362,9 @@ Set to nil to disable the indicator."
   (save-excursion
     (let* ((beg (match-beginning 0))
            (end (match-end 0))
+           ;; Unique objects
+           (sp1 (list 'space :width 1))
+           (sp2 (list 'space :width 1))
            (color (face-attribute 'org-table :foreground nil t))
            (inner (progn
                     (goto-char beg)
@@ -394,7 +397,8 @@ Set to nil to disable the indicator."
                 (b (match-end 0)))
             ;; TODO Text scaling breaks the table formatting since the space 
is not scaled accordingly
             (cl-loop for i from a below b do
-              (put-text-property i (1+ i) 'display (list 'space :width 
1)))))))))
+                     (put-text-property i (1+ i) 'display
+                                        (if (= 0 (mod i 2)) sp1 sp2)))))))))
 
 (defun org-modern--block ()
   "Prettify blocks."