branch: externals/org
commit 7c6302e2034916ed38f1c61dd0806f48e6f8a21c
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@posteo.net>
org-agenda-show-new-time: Fix when window is very narrow
* lisp/org-agenda.el (org-agenda-show-new-time): When window is
narrower than timestamp, do not try to display timestamps starting at
negative column.
Reported-by: Nick Römer <nick.ro...@skynet.be>
Link:
https://orgmode.org/list/4196e86e.19136.1891ceef131.webtop....@skynet.be
---
lisp/org-agenda.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 89c10403bd..11db80bd78 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -10100,8 +10100,10 @@ When called programmatically, FORCE-DIRECTION can be
`set', `up',
(line-end-position)
'(display nil))
(org-move-to-column
- (- (window-max-chars-per-line)
- (length stamp))
+ (max
+ 1 ;; narrow buffer and wide timestamp
+ (- (window-max-chars-per-line)
+ (length stamp)))
t)
(add-text-properties
(1- (point)) (line-end-position)
