Some progress --
I used Nick's suggestion combined with the org-read-date function.
This is my first attempt -- It will prompt you for a time, and clock
in to the headline that the cursor is on with that time.
(defun njn/clock-in-at-time()
(interactive)
(setq start-time (org-read-date 't 't))
(org-clock-in nil start-time)
)
It's a bit wonky if you clock in to a past time, and then you want to
resolve that clock, but my main use-case for now is this:
1) I start doing something
2) I forgot to clock in
3) I don't want to press 8 keys in order to clock in 15 minutes ago.
This solution should work for now. Although, I could see it being a
handy way to
prompt for clock-in *and* clock-out times.
Thanks for the suggestions,
--Nate
On Wed, Oct 19, 2011 at 10:35 AM, Nick Dokos <nicholas.do...@hp.com> wrote:
> John Hendy <jw.he...@gmail.com> wrote:
>
>> On Wed, Oct 19, 2011 at 9:54 AM, Nathan Neff <nathan.n...@gmail.com> wrote:
>> > Is there a way to pull up a date/time prompt when clocking in to a task?
>> >
>> > Sometimes, I started a task 15 minutes ago, and have to go through the
>> > following
>> > steps:
>> >
>> > 1) clock in on the task,
>> > 2) Go to the CLOCK section for that header and press tab to open it
>> > 3) Fix the clock-in time
>> >
>> > If it's not built in, does anyone have any slick functions that would
>> > accomplish
>> > the same thing? :-)
>>
>> Check out a thread I started a bit back on this exact topic:
>> --- http://www.mail-archive.com/emacs-orgmode@gnu.org/msg40498.html
>>
>> It wasn't exactly what I expected, the suggestion by Bernt for `M-x
>> org-resolve-clocks` works reasonably well if you are trying to clock
>> back-to-back activities. Post back after you read that perhaps? Maybe
>> you'll find something helpful.
>>
>
> org-clock-in takes an optional start-time argument which is used instead
> of the current time when non-nil. So I tried
>
> (setq ct (current-time))
> (setq start-time (cons (car ct) (list (- (cadr ct) 900) (caddr ct))))
>
> and started a clock on a task with
>
> ESC ESC : (org-clock-in nil start-time)
>
> and it got clocked in 15 minutes before the current time.
>
> Now I don't propose this as a good UI :-), but it would require just a
> small wrapper for it to dtrt.
>
> HTH,
> Nick
>
>
>
