mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

org-agenda: Fix last commit 

* lisp/org-agenda.el (org-agenda-align-tags): Fix thinko in last
  commit.
This commit is contained in:
Nicolas Goaziou 2018-04-29 10:03:31 +02:00
parent 031b75f500
commit 298eaa1c32
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-agenda.el
View File

@ -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))