Jelajahi Sumber

org.el: Fix whitespace issue blocking upstream commit

Rasmus 7 tahun lalu
induk
melakukan
ab488dc438
1 mengubah file dengan 5 tambahan dan 5 penghapusan
  1. 5 5
      lisp/org.el

+ 5 - 5
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))))))))