branch: externals/org
commit bf6145354e9505063d4469278dd4f86b8f59cada
Author: Slawomir Grochowski <[email protected]>
Commit: Slawomir Grochowski <[email protected]>
; org-colview: Clarify cell format construction
* lisp/org-colview.el (org-columns--cell-format-string): Build the base
format string separately from the conditional trailing space.
Refactoring: Decompose Conditional.
No behavior change.
---
lisp/org-colview.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/org-colview.el b/lisp/org-colview.el
index 534c7f54e9..30ddd5a2c1 100644
--- a/lisp/org-colview.el
+++ b/lisp/org-colview.el
@@ -399,7 +399,8 @@ The template pads and truncates its argument to WIDTH
characters,
followed by \" | \" separator. When optional argument LASTP is
non-nil, omit the trailing space after the separator, since no
further column follows."
- (format (if lastp "%%-%d.%ds |" "%%-%d.%ds | ") width width))
+ (concat (format "%%-%d.%ds |" width width)
+ (unless lastp " ")))
(defun org-columns--propertize-tags (tag-text)
"Apply Org tag faces to TAG-TEXT."
