[Orgmode] Re: Agenda view > Face for deadlines > PATCH

[Sébastien Vauban]

Hi all,

Sébastien Vauban wrote:
> Carsten Dominik wrote:
>> Sébastien Vauban wrote:
>>> Sébastien Vauban wrote:
>>>> Sébastien Vauban wrote:
>>>>>
>>>>> In the same kind of thought, trying to enhance the way we (or I)
>>>>> visualize tasks in the agenda, I have chosen some sort of "inverse
>>>>> video" face for deadlines.
>>>>>
>>>>> (my-org-deadline-yesterday ((t (:foreground "white" :background "#D80000" 
>>>>> :weight bold))))
>>>>> (my-org-deadline-today ((t (:foreground "white" :background "#E9A36A" 
>>>>> :weight bold))))
>>>>> (my-org-deadline-tomorrow ((t (:foreground "black" :background "#B4F1B3" 
>>>>> :weight bold))))
>>>>> (my-org-deadline-later ((t (:foreground "black" :background "#AACAFC"))))
>>>>>
>>>>> [...]
>>>>>
>>>>> The result is the following:
>>>>>
>>>>> Week-agenda (W20-W21):
>>>>> 2010-05-18 Tue 
>>>>> _________________________________________________________________
>>>>>   Personal:   17:15-17:20 Sarah!                                 
>>>>> :home::errands:
>>>>>   refile:     Sched. 2x:  TODO [#A] Update reservations Scorpios       
>>>>> :refile::
>>>>> x Family: xxx In  -1 d.:  TODO [#A] Photos-reportage Andre xxxx 
>>>>> :home::computer:
>>>>>
>>>>> where the `x' are just some textual way to represent background color.
>>>>>
>>>>> For the sake of clarity, I'd like the first 2 characters (in front of
>>>>> `Family', in my example) not to be "impacted" by that face. Otherwise,
>>>>> when in inverse video, they obfuscate the view of the day separators and
>>>>> of the deadline lines.

Still trying to solve this, now that I have learned a bit more (but, still
only a bit...) on debugging Lisp code.

I've (on purpose) "forgotten" all I did and found in the past (june-july), to
start again from scratch, and be sure I identify the right defuns to work on.

So, to resume, my *goal* is to try applying a face with white background (in
my case) on the first 2 characters of every TODO line appearing in the agenda.

But, question: *which defun* does do that?  How to find that information?  I
instrumented the org packages with ELP, and got many function calls. I
searched for functions that were called at least as many times as the number
of lines I have in my weekly agenda.

(is there a better way to _trace_ function calls, and see a call tree?  `M-x
trace', mabye, but it did not help me a lot so far -- maybe lacking
experience)

By stepping through some functions, I've understood that the functions that
interest me are the following:

org-agenda-list
   -> org-finalize-agenda-entries
       -> *org-agenda-highlight-todo*

Though, what I really don't understand is that I `C-u C-M-x' the function
=org-agenda-highlight-todo=, and then call =org-agenda-list=, expecting to
trace the function that *highlights every TODO line* of my agenda.

And... no, *edebug is not launched*!?  I really don't understand that...

On the contrary, executing `C-c a s' does stop me in that function. So, the
function has *well been instrumented*.

Any idea about which wrong direction I'm taking?

Best regards,
  Seb

-- 
Sébastien Vauban