emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Christopher Allan Webber <cwebber@dustycloud.org>
To: Noorul Islam K M <noorul@noorul.com>
Cc: Emacs-orgmode <Emacs-orgmode@gnu.org>
Subject: Re: habit-only agenda that doesn't remove tasks when done?
Date: Thu, 21 Nov 2013 10:25:26 -0600	[thread overview]
Message-ID: <87pppten7t.fsf@earlgrey.lan> (raw)
In-Reply-To: <87li5anag9.fsf@noman.maa.corp.collab.net>

noorul@noorul.com writes:

> Christopher Allan Webber <cwebber@dustycloud.org> writes:
>> Hello,
>> I'd like to have a habit-only agenda view, if possible, that looks a bit
>> like:
>> Morning habits
>> --------------
>> life:  TODO Shave               [   * *  *    *         !]  habit::morning:
>> rsi:   TODO morning stretches   [  **   **    **       *!]  habit::morning:
>> Night habits
>> ------------
>> life:  TODO Exercise            [   * *  *    *         !]  habit::night:
>> ... and maybe an other category for cathing the rest.
>> I'd also like to have these habits not drop off the agenda view when I
>> move them to DONE if possible.  However, I'm getting the sense that this
>> isn't possible... it seems like the habit system works with
>> agendas-only, and there's no way to say "give me an agenda with only
>> these certain things on it".
> Did you try the following custom command?
>               ("h" "Habits" tags-todo "STYLE=\"habit\""
>                ((org-agenda-overriding-header "Habits")
>                 (org-agenda-sorting-strategy
>                  '(todo-state-down effort-up category-keep))))
> Thanks and Regards
> Noorul

Never noticed this reply till now...

Yes, I tried it; unfortunately it does not show the habit graph, that
only displays in the agenda, and the above version uses tags-todo.

I'd like to be able to show habits, *with* the graph though.  The only
way to do that seems to be through the agenda, and the "match"
parameter of agenda custom commands doesn't seem to support the agenda.

I finally figured out a solution:

#+BEGIN_SRC emacs-lisp
  (defun cwebber/skip-unless-habit ()
    "Checks to see if the style at point is \"habit\""
    (if (not (equal (org-entry-get (point) "STYLE") "habit"))
        ; Skip till the next heading
        (progn (outline-next-heading) (1- (point)))))
  (setq org-agenda-custom-commands
        '(("h" "Habits"
             ((org-habit-show-all-today t)
              (org-agenda-skip-function 'cwebber/skip-unless-habit)))))))

This solution works.  It allows me to pull up just the habits, including
those that have already been done today.

There's only one thing left to do that would make it awesome, and that
would be to make it so that the ones that are now already done said DONE
instead of TODO still.

Other than that, this seems to be kinda working-ish.

      reply	other threads:[~2013-11-21 16:51 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-04-26 14:02 habit-only agenda that doesn't remove tasks when done? Christopher Allan Webber
2013-07-13  8:14 ` Noorul Islam K M
2013-11-21 16:25   ` Christopher Allan Webber [this message]

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:

  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=87pppten7t.fsf@earlgrey.lan \
    --to=cwebber@dustycloud.org \
    --cc=Emacs-orgmode@gnu.org \
    --cc=noorul@noorul.com \


* 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


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).