diff options
Diffstat (limited to 'oni-org')
| -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." |