[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[mhc:02288] Re: toggle todos



David, thank you for your contribution.

> [ I hope it is OK to write to this list in English. My Nihongo pretty
> much starts and stops at sumimasen and o-kudasai. ]

OK, so is my English. Elisp will do for us instead :-)

> I just started to use mhc, and I like it very much so far.
> 
> Here is a simple addition to allow toggling todo's with "ctrl-C . @".

It works for me, I'll commit it to the CVS in several days, 
if anyone made an objection.

> (define-key mhc-prefix-map "@" 'mhc-todo-toggle-done)
> (defun mhc-todo-toggle-done ()
>   "Toggle between done and not for todo"
>   (interactive)
>   (mhc-modify-file (mhc-summary-filename))
>   (mhc-draft-toggle-done)
>   (mhc-draft-finish)
>   (message ""))
> 
> (defun mhc-draft-toggle-done ()
>   "Set current draft as DONE if not; remove done if there."
>   (interactive)
>   (if  (mhc-draft-in-category-p "todo")
>       (if (mhc-draft-in-category-p "done")
> 	  (mhc-draft-delete-category "done")
> 	(mhc-draft-append-category "Done"))))

--
nom