From: Samuel Wales <samologist@gmail.com>
To: Marcin Borkowski <mbork@mbork.pl>
Cc: Eric S Fraga <esflists@gmail.com>,
Ken Mankoff <mankoff@gmail.com>,
Leo Gaspard <orgmode@leo.gaspard.io>,
emacs-orgmode@gnu.org
Subject: Re: Tasks performed on a certain day
Date: Wed, 7 Nov 2018 18:31:09 -0700 [thread overview]
Message-ID: <CAJcAo8s+PxihqGhfKp1bspC5hqRfgVAacbrQ77x+71tiSHApBg@mail.gmail.com> (raw)
In-Reply-To: <87tvktglg3.fsf@mbork.pl>
i also call them event.
i have code below that shows them in agenda as "Event:" in their own face.
i think there was a proposal a while back to have them be in the
planning line [the one just after the header] as EVENT: <...> along
with closed, scheduled, and deadline. i kinda liked that proposal
[great for 3rd party tools, maybe even a bit faster, consistency] but
it never went anywhere. :]
===
note: i am not signed up with fsf.
commit 33a49662f7b89e9fd52742a59542dfb0f116e715 (HEAD, refs/heads/local)
Author: Your Name <you@example.com>
Date: 2015-08-08 13:10:12 -0700
=== alpha add one space to leaders, add Event:, format state better
Modified lisp/org-agenda.el
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 234c0da..268aa00 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5593,7 +5593,10 @@ displayed in agenda view."
(habit? (and (fboundp 'org-is-habit-p) (org-is-habit-p)))
(item
(org-agenda-format-item
- (and inactive? org-agenda-inactive-leader)
+ (if inactive?
+ org-agenda-inactive-leader
+ ;; alpha this could be an org-agenda-event-leader
+ "Event: ")
head level category tags time-stamp org-ts-regexp habit?)))
(org-add-props item props
'priority (if habit?
@@ -5609,7 +5612,7 @@ displayed in agenda view."
'warntime warntime
;; =alpha this adds inactive timestamp face
;; how i figured this out, i do not know
- 'face (if inactivep
+ 'face (if inactive?
'org-agenda-inactive
'org-agenda-calendar-event)
'type "timestamp")
@@ -5814,9 +5817,16 @@ then those holidays will be skipped."
(setq txt (concat txt " - " extra))))
(setq txt (org-agenda-format-item
(cond
- (closedp "Closed: ")
- (statep (concat "State: (" state ")"))
- (t (concat "Clocked: (" clocked ")")))
+ (closedp "Closed: ")
+ ;; alpha the only issue here is somehow
+ ;; we have to turn off my inactive,
+ ;; which picks this up redundantly
+ (statep (format "S(%7.7s) " state))
+ ;; ;; alpha adding one space because line up
+ ;; (statep (concat "State: (" state ")"))
+ ;; (t (format "C(%7.7s) " clocked)))
+ ;; alpha adding one space because line up
+ (t (concat "Clocked: (" clocked ")")))
txt level category tags timestr)))
(setq priority 100000)
(org-add-props txt props
[back]
next prev parent reply other threads:[~2018-11-08 1:31 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2018-11-06 13:59 Tasks performed on a certain day Leo Gaspard
2018-11-06 17:38 ` Eric S Fraga
2018-11-07 1:10 ` Leo Gaspard
2018-11-07 1:49 ` Ken Mankoff
2018-11-07 11:33 ` Leo Gaspard
2018-11-07 11:45 ` Marcin Borkowski
2018-11-08 1:31 ` Samuel Wales [this message]
2018-11-08 17:34 ` Nicolas Goaziou
2018-11-09 10:41 ` Gregor Zattler
2018-11-07 8:04 ` Marcin Borkowski
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAJcAo8s+PxihqGhfKp1bspC5hqRfgVAacbrQ77x+71tiSHApBg@mail.gmail.com \
--to=samologist@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=esflists@gmail.com \
--cc=mankoff@gmail.com \
--cc=mbork@mbork.pl \
--cc=orgmode@leo.gaspard.io \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).