[elpa] externals/code-cells 2b157f82f7 4/4: Set paragraph-start appropriately in code-cells-mode

[ELPA Syncer]

branch: externals/code-cells
commit 2b157f82f74375454719defd65b0508ce43decd2
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Set paragraph-start appropriately in code-cells-mode
---
 code-cells.el | 25 +++++++++++++++----------
 1 file changed, 15 insertions(+), 10 deletions(-)

diff --git a/code-cells.el b/code-cells.el
index d497c77ea5..69a8986426 100644
--- a/code-cells.el
+++ b/code-cells.el
@@ -303,17 +303,22 @@ level."
   :keymap (make-sparse-keymap)
   (if code-cells-mode
       (progn
-        (setq-local code-cells--saved-vars (list outline-level
-                                                 outline-regexp
-                                                 outline-heading-end-regexp)
-                    outline-level 'code-cells--outline-level
-                    outline-regexp (rx (or (regexp 
(code-cells-boundary-regexp))
-                                           (regexp outline-regexp)))
-                    outline-heading-end-regexp "\n")
+        (setq-local
+         code-cells--saved-vars (list outline-level
+                                      outline-regexp
+                                      outline-heading-end-regexp
+                                      paragraph-start)
+         outline-level 'code-cells--outline-level
+         outline-regexp (rx (or (regexp (code-cells-boundary-regexp))
+                                (regexp outline-regexp)))
+         outline-heading-end-regexp "\n"
+         paragraph-separate (rx (or (regexp paragraph-separate)
+                                    (regexp (code-cells-boundary-regexp)))))
         (font-lock-add-keywords nil (code-cells--font-lock-keywords)))
-    (setq-local outline-level (nth 0 code-cells--saved-vars)
-                outline-regexp (nth 1 code-cells--saved-vars)
-                outline-heading-end-regexp (nth 2 code-cells--saved-vars))
+    (setq-local outline-level (pop code-cells--saved-vars)
+                outline-regexp (pop code-cells--saved-vars)
+                outline-heading-end-regexp (pop code-cells--saved-vars)
+                paragraph-separate (pop code-cells--saved-vars))
     (font-lock-remove-keywords nil (code-cells--font-lock-keywords)))
   (font-lock-flush))