From ab488dc4383fa313b132988819f738afe314132e Mon Sep 17 00:00:00 2001 From: Rasmus Date: Tue, 27 Mar 2018 23:33:35 +0200 Subject: [PATCH] org.el: Fix whitespace issue blocking upstream commit --- lisp/org.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index e01134f87..1373861ad 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -4909,10 +4909,10 @@ Support for group tags is controlled by the option ((null alist2) alist1) ((null alist1) alist2) (t (let ((alist2-cars (mapcar (lambda (x) (car-safe x)) alist2)) - to-add) + to-add) (dolist (i alist1) (unless (member (car-safe i) alist2-cars) - (push i to-add))) + (push i to-add))) (append to-add alist2))))) (defun org-set-regexps-and-options (&optional tags-only) @@ -14340,9 +14340,9 @@ instead of the agenda files." (org-tag-add-to-alist (org-get-buffer-tags) (mapcar (lambda (x) - (and (stringp (car-safe x)) - (list (car-safe x)))) - org-current-tag-alist))) + (and (stringp (car-safe x)) + (list (car-safe x)))) + org-current-tag-alist))) (if (car-safe files) files (org-agenda-files))))))))