From 6a5d059ddada8b7a156eb4fa64c6a7990edcc884 Mon Sep 17 00:00:00 2001 From: dx Date: Thu, 11 Jun 2020 01:33:08 +0100 Subject: ~!fix bug where fill auto lines doesn't concat properly --- Doom/.doom.d/org/personal.org | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Doom/.doom.d/org') diff --git a/Doom/.doom.d/org/personal.org b/Doom/.doom.d/org/personal.org index 546c5be..d8813cd 100644 --- a/Doom/.doom.d/org/personal.org +++ b/Doom/.doom.d/org/personal.org @@ -96,7 +96,7 @@ Then the main function, works like so: (n-sentences (dx:org/count-sub region-text ".")) (parsed-text (apply #'concatenate 'string (cl-loop for c from beg to end collect (if (string= (buffer-substring-no-properties c (+ c 1)) "\n") " " - c))))) + (buffer-substring-no-properties c (+ c 1))))))) (delete-region beg end) (insert parsed-text) (message "%s" n-sentences) -- cgit v1.2.3-13-gbd6f