"Cezar Halmagean" <cezar@mixandgo.com> writes:

>> (add-hook 'initial-calendar-window-hook 'mark-diary-entries)
>>
>> If %%(org-diary :scheduled :timestamp) throws an error, cheat a little
>> and use this instead:
>>
>> %%(condition-case nil (org-diary :scheduled :timestamp) (error nil))
>
> Does anyone have a screenshot of how this looks like ? I can't imagine
> what it does and how it displays things.

See the screenshot.  

The dates in red color are those where there is a diary appointment or
an org agenda scheduled item.