diff options
author | Tom Willemse | 2023-03-20 22:57:50 -0700 |
---|---|---|
committer | Tom Willemse | 2023-03-20 22:57:50 -0700 |
commit | b468287aa7fc249a7eebbfcc24261fca7ef42631 (patch) | |
tree | c11029d7a055cc63d6b8981740ef1df0137477ae /oni-org/oni-org.el | |
parent | aec7aa6267e382d17b9215e2b343a59b1ee09c0f (diff) | |
download | emacs-config-b468287aa7fc249a7eebbfcc24261fca7ef42631.tar.gz emacs-config-b468287aa7fc249a7eebbfcc24261fca7ef42631.zip |
[oni-org] Don't truncate the text in the pomodoro overview
Instead specify a width for the column and shrink the table. This way it still
gets truncated, but it can be expanded and the whole text is in the column.
Diffstat (limited to 'oni-org/oni-org.el')
-rw-r--r-- | oni-org/oni-org.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/oni-org/oni-org.el b/oni-org/oni-org.el index 5cd5cfc..23a0c8b 100644 --- a/oni-org/oni-org.el +++ b/oni-org/oni-org.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse <tom@ryuslash.org> ;; Keywords: local -;; Version: 2023.0314.013950 +;; Version: 2023.0320.225105 ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org org-contrib org-bullets org-edna diminish all-the-icons olivetti form-feed) ;; This program is free software; you can redistribute it and/or modify @@ -971,19 +971,19 @@ placed above TARGET. Otherwise it will be placed below it." (string-trim-right (apply #'concat "| | Task | Effort |\n" "|-+------+--------|\n" + "| | <60> | |\n" (mapcar (lambda (itm) (let ((emphasis (if (alist-get 'done itm) "+" "")) (title (alist-get 'title itm))) (format "| | %s[[id:%s][%s]]%s | %s |\n" emphasis (alist-get 'id itm) - (if (> (length title) 60) - (format "%s..." (substring title 0 57)) - title) + title emphasis (make-string (alist-get 'poms itm) ?X)))) info)))) - (org-table-align))) + (org-table-align) + (org-table-shrink))) (defun oni-org-insert-pomodoro-overview () "Create a dynamic block showing the Pomodoro overview for today." |