org-agenda: Fix last commit
* lisp/org-agenda.el (org-agenda-align-tags): Fix thinko in last commit.
This commit is contained in:
parent
031b75f500
commit
298eaa1c32
|
@ -9002,7 +9002,7 @@ current line."
|
|||
(org-agenda-tags-column (if (eq 'auto org-agenda-tags-column)
|
||||
(- (window-text-width))
|
||||
org-agenda-tags-column))
|
||||
(end (if line (line-end-position) (point-max)))
|
||||
(end (and line (line-end-position)))
|
||||
l c)
|
||||
(save-excursion
|
||||
(goto-char (if line (line-beginning-position) (point-min)))
|
||||
|
@ -9023,7 +9023,7 @@ current line."
|
|||
(delete-region (save-excursion (skip-chars-backward " \t") (point))
|
||||
(point))
|
||||
(insert (org-add-props
|
||||
(make-string (max 1 (- c (current-column))) ?\ )
|
||||
(make-string (max 1 (- c (current-column))) ?\s)
|
||||
(plist-put (copy-sequence (text-properties-at (point)))
|
||||
'face nil))))
|
||||
(goto-char (point-min))
|
||||
|
|
Loading…
Reference in New Issue