diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-29 10:03:31 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-29 10:03:31 +0200 |
| commit | 298eaa1c323c05b67752f3fe8b5f62849f59a0d5 (patch) | |
| tree | 170b27d9b000cb33eed8c5cec4c40fd7aa823779 | |
| parent | 031b75f5001d8016d37a47109816ee7fbd1d1599 (diff) | |
| download | org-mode-298eaa1c323c05b67752f3fe8b5f62849f59a0d5.tar.gz | |
org-agenda: Fix last commit
* lisp/org-agenda.el (org-agenda-align-tags): Fix thinko in last
commit.
| -rw-r--r-- | lisp/org-agenda.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index a3776ba..62ce25d 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -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)) |