[elpa] externals/rec-mode a89b7c2 89/98: rec-mode: split fields by comma and whitespace for summary

[Stefan Monnier]

branch: externals/rec-mode
commit a89b7c2842ed125c1c597bfb89081d2a18a6695b
Author: Antoine Kalmbach <ane@iki.fi>
Commit: Antoine Kalmbach <ane@iki.fi>

    rec-mode: split fields by comma and whitespace for summary
    
    2020-11-07  Antoine Kalmbach  <ane@iki.fi>
    
        * etc/rec-mode.el (rec-summary-fields): split by comma and space
        (rec-cmd-show-summary): split minibuffer input
---
 etc/rec-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/etc/rec-mode.el b/etc/rec-mode.el
index b354800..b91c91f 100644
--- a/etc/rec-mode.el
+++ b/etc/rec-mode.el
@@ -912,7 +912,7 @@ current record set."
     (when descriptor
       (let ((fields-str (rec-record-assoc rec-keyword-summary descriptor)))
         (when fields-str
-          (split-string (car fields-str)))))))
+          (split-string (car fields-str) "[ ,]"))))))
 
 (defun rec-mandatory-fields ()
   "Return a list with the names of the mandatory fields in the
@@ -2077,7 +2077,7 @@ the user is prompted."
         (unless summary-fields
           (setq summary-fields (list (rec-key)))
           (unless (car summary-fields)
-            (setq summary-fields (list (read-from-minibuffer "Fields to use in 
the summary: ")))))
+            (setq summary-fields (split-string (read-from-minibuffer "Fields 
to use in the summary: ") "[ ,]"))))
         (if (car summary-fields)
             (let* ((query (rec-query :fex (rec-join-string summary-fields 
",")))
                    (summary-list (mapcar (lambda (rec)