[BUG] Expose more Org Agenda leaders [9.5.2 (release_9.5.2-13-gdd6486 @ /Users/salutis/src/emacs/nextstep/Emacs.app/Contents/Resources/lisp/org/)]
Remember to cover the basics, that is, what you expected to happen and
what in fact did happen. You don't know how to make a good report? See
https://orgmode.org/manual/Feedback.html#Feedback
Your bug report will be posted to the Org mailing list.
Org Agenda allows one to configure its "leaders", e.g.
(setq-default org-agenda-deadline-leaders
'("Deadline: "
"Deadline in %d day(s):"
"Deadline %d day(s) ago:")
org-agenda-scheduled-leaders
'("Scheduled:"
"Scheduled %d×:"))
The leader variables currently include:
org-agenda-entry-text-leaders
org-agenda-inactive-leader
org-agenda-scheduled-leaders
org-agenda-deadline-leaders
org-agenda-timerange-leaders
Some leaders remain hard-coded in "org-agenda.el":
(setq txt (org-agenda-format-item
(cond
(closedp "Closed:")
(statep (concat "State: (" state ")"))
(t (concat "Clocked: (" clocked ")")))
txt level category tags timestr)))
Could we expose these leaders as well?
Rudy
Emacs : GNU Emacs 29.0.50 (build 7, x86_64-apple-darwin21.2.0, NS
appkit-2113.20 Version 12.1 (Build 21C52))
of 2022-02-15
Package: Org mode version 9.5.2 (release_9.5.2-13-gdd6486 @
/Users/salutis/src/emacs/nextstep/Emacs.app/Contents/Resources/lisp/org/)
current state:
==
(setq
org-agenda-prefix-format "* % t% s"
org-link-elisp-confirm-function 'yes-or-no-p
org-agenda-skip-deadline-prewarning-if-scheduled t
org-cite-insert-processor 'citar
org-bibtex-headline-format-function #[257 "\300.\236A\207" [:title] 3 "\n\n(fn
ENTRY)"]
org-agenda-scheduled-leaders '("Scheduled:" "Scheduled %d×:")
org-agenda-custom-commands '(("a" "Agenda"
((agenda ""
((org-agenda-overriding-header "Fortune")
(org-agenda-files nil) (org-agenda-span 1)
(org-agenda-day-face-function
(lambda (_) 'font-lock-comment-face))
(org-agenda-format-date (lambda (_)
(my/fortune-string)))
)
)
(agenda ""
((org-agenda-overriding-header "\nToday")
(org-agenda-start-on-weekday nil)
(org-agenda-span 1)
(org-agenda-format-date
'my/org-agenda-format-date-not-aligned)
(org-agenda-day-face-function
(lambda (_) 'calendar-today))
(org-agenda-skip-function
'(org-agenda-skip-entry-if 'todo 'done))
)
)
(todo "NEXT|NEXT-IN|ON-HOLD"
((org-agenda-overriding-header "\nNext
actions")
(org-agenda-todo-ignore-scheduled 'all)
(org-agenda-todo-ignore-timestamp 'future)
(org-habit-show-habits nil))
)
(agenda ""
((org-agenda-overriding-header "\nTomorrow")
(org-agenda-start-day "+1d") (org-agenda-span
1)
(org-agenda-format-date
'my/org-agenda-format-date-not-aligned)
(org-habit-show-habits-only-for-today nil)
(org-habit-scheduled-past-days 0))
)
(agenda ""
((org-agenda-overriding-header "\nNear future")
(org-agenda-start-day "+2d")
(org-agenda-start-on-weekday nil)
(org-agenda-span 7)
(org-habit-show-habits nil))
)
(todo "WAIT-FOR"
((org-agenda-overriding-header "\nWaiting")))
)
)
)
org-startup-folded t
org-babel-after-execute-hook '(org-display-inline-images)
org-agenda-skip-scheduled-if-done t
org-agenda-files '("~/agenda.org" "~/agenda-work.org")
org-export-before-parsing-hook '(org-attach-expand-links)
org-link-descriptive nil
org-archive-hook '(org-attach-archive-delete-maybe)
org-cite-follow-processor 'citar
org-file-apps '(("\\.pdf\\'" . emacs) (auto-mode . emacs) (directory . emacs)
("\\.mm\\'" . default) ("\\.x?html?\\'" . default)
Re: table format during html export
Juan Manuel Macías writes: > Hi Leo, > > Leo Butler writes: > >> Hello, >> >> I have some tables like >> >> | a | b | >> | c | d | >> >> I would like to have this export (in html) to something like >> >> | a b | >> | c d | >> >> i.e., add a vertical bar on the extreme left and right. >> >> I have searched the org manual and online and I can't find a >> solution. >> >> TIA, >> Leo >> > > You can modify the attributes for a certain table, for example like this: > > #+ATTR_HTML: :border 2 :cellspacing 0 :cellpadding 6 :rules none :frame vsides > | a | b | > | c | d | > > For all tables, you can apply a value to > `org-html-table-default-attributes', locally or globally: > > #+begin_src emacs-lisp > (setq org-html-table-default-attributes > '(:border "2" :cellspacing "0" :cellpadding "6" :rules "none" :frame > "vsides")) > #+end_src Thank you! That did exactly what I wanted. Leo
Re: [PATCH] ox-latex.el: Add a `t' value for `:float' in tables and figures (was: update and add info for arbitrary :float values)
Hi,
I am attaching an updated version of the patch, which retrieves the
`t' value for `:float' in tables and figures. The necessary information in
the Manual is also updated.
Best regards,
Juan Manuel
Nicolas Goaziou writes:
> Hello,
>
> Juan Manuel Macías writes:
>
>> Ah, sorry, I hadn't noticed that :-). The thing is that I have in my
>> ~/.emacs `sentence-end-double-space' set to nil.
>
> Yes, .dir-locals.el files contains (sentence-end-double-space . t).
> Somehow, you are not evaluating it.
>
>>> However, isn't it a bug? Shouldn't t value default to "figure"
>>> environment, if only for the sake of backward compatibility?
>>
>> I think you're right. t value should be figure and table, I agree. Would
>> it be appropriate to add these two lines:
>>
>> In org-latex--inline-image:
>>
>> ((string= float "t") 'figure)
>>
>> And in org-latex--decorate-table
>>
>> ((string= float "t") "table")
>
> I think so.
>
> Regards,
>From b00b1d30d66d0932d4becb3c74fe3c3837dbdec1 Mon Sep 17 00:00:00 2001
From: Juan Manuel Macias
Date: Wed, 16 Feb 2022 20:27:38 +0100
Subject: [PATCH] lisp/ox-latex.el: Add a `t' value for `:float' in tables and
figures
* org-latex--inline-image: default `figure' environment
* org-latex--decorate-table: default table environment
* doc/org-manual.org (Tables in LaTeX export): add `t' and arbitrary
`:float' values
* doc/org-manual.org (Images in LaTeX export): add `t' and arbitrary
`:float' values
---
doc/org-manual.org | 15 ---
lisp/ox-latex.el | 2 ++
2 files changed, 14 insertions(+), 3 deletions(-)
diff --git a/doc/org-manual.org b/doc/org-manual.org
index b8c61fddd..d58f80523 100644
--- a/doc/org-manual.org
+++ b/doc/org-manual.org
@@ -13572,7 +13572,12 @@ include:
The table environments by default are not floats in LaTeX. To make
them floating objects use =:float= with one of the following
- options: =sideways=, =multicolumn=, =t=, and =nil=.
+ options: =t= (for a default =table= environment), =sideways= (for a
+ =sidewaystable= environment), =multicolumn= (to span the table
+ across multiple columns of a page in a =table*= environment) and
+ =nil=. In addition to these three values, =:float= can pass through
+ any arbitrary value, for example a user-defined float type with the
+ =float= LaTeX package.
LaTeX floats can also have additional layout =:placement=
attributes. These are the usual =[h t b p ! H]= permissions
@@ -13686,8 +13691,7 @@ attribute to one of the following:
- =t= ::
- For a standard =figure= environment; used by default whenever an
- image has a caption.
+For a default =figure= environment.
- =multicolumn= ::
@@ -13708,6 +13712,11 @@ attribute to one of the following:
To avoid a =:float= even if using a caption.
+- Any arbitrary value ::
+
+ For example, a user-defined float type with the =float= LaTeX package.
+
+
Use the =placement= attribute to modify a floating environment's
placement.
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 5dda9b3ab..0edba9e52 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -2414,6 +2414,7 @@ used as a communication channel."
(cond ((string= float "wrap") 'wrap)
((string= float "sideways") 'sideways)
((string= float "multicolumn") 'multicolumn)
+((string= float "t") 'figure)
((and (plist-member attr :float) (not float)) 'nonfloat)
(float float)
((or (org-element-property :caption parent)
@@ -3269,6 +3270,7 @@ Return new environment, as a string."
(cond ((and (not float) (plist-member attributes :float)) nil)
((member float '("sidewaystable" "sideways")) "sidewaystable")
((equal float "multicolumn") "table*")
+ ((string= float "t") "table")
(float float)
((org-string-nw-p caption) "table")
(t nil
--
2.35.0
[O] How to add "days since" in heading
Hello, I'd like to have something like "diary-anniversary" but report "days since" a date, rather than "years since". For example, I have > ** Birthdays > %%(diary-anniversary 12 11 2010) Their %d%s birthday And in my Agenda I then see: > events: Their 21st birthday I'd like to have something like this: > ** Foo > %%(diary-foo 2021-02-13) Bar [%d days] And in my Agenda I then see: > events: Bar [4 days] That is, I would like to track how long since an event (in this case, how long a paper has been in review) without using SCHEDULING which makes things appear overdue if scheduled in the past. Thanks, -k.
