[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 1292d89 4/4: Clean up spacing to pass Emacs's pre-c
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 1292d89 4/4: Clean up spacing to pass Emacs's pre-commit check |
Date: |
Wed, 29 Sep 2021 00:57:20 -0400 (EDT) |
branch: externals/org
commit 1292d89c37073d4cde037f703d4cb9227a98931c
Author: Kyle Meyer <kyle@kyleam.com>
Commit: Kyle Meyer <kyle@kyleam.com>
Clean up spacing to pass Emacs's pre-commit check
* lisp/org-agenda.el (org-agenda-highlight-todo):
(org-agenda-set-mode-name):
* lisp/org-table.el (org-table-eval-formula): Avoid space before tab in
indent.
This is in preparation for syncing with the Emacs repo.
---
lisp/org-agenda.el | 8 ++++----
lisp/org-table.el | 2 +-
2 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 1a3bfab..f6e2d48 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -7182,7 +7182,7 @@ The optional argument TYPE tells the agenda type."
;; Remove `display' property as the icon could leak
;; on the white space.
(org-add-props " " (org-plist-delete (text-properties-at 0 x)
- 'display))
+ 'display))
(substring x (match-end 3)))))))
x)))
@@ -8807,15 +8807,15 @@ When called with a prefix argument, include all archive
files as well."
'(:eval (propertize
(concat "["
(mapconcat
- #'identity
+ #'identity
(append
(get 'org-agenda-category-filter
:preset-filter)
org-agenda-category-filter)
"")
"]")
'face 'org-agenda-filter-category
- 'help-echo "Category used in filtering"))
- "")
+ 'help-echo "Category used in filtering"))
+ "")
(if (or org-agenda-tag-filter
(get 'org-agenda-tag-filter :preset-filter))
'(:eval (propertize
diff --git a/lisp/org-table.el b/lisp/org-table.el
index 20f848c..0712e61 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -2457,7 +2457,7 @@ location of point."
(let ((c (string-to-char (match-string 1 fmt))))
(cl-case c
(?t (setq duration t numbers t
- duration-output-format
org-table-duration-custom-format))
+ duration-output-format
org-table-duration-custom-format))
(?T (setq duration t numbers t duration-output-format nil))
(?U (setq duration t numbers t duration-output-format 'hh:mm))
(?N (setq numbers t))