RE: [Orgmode] Behavior Change/Bug: Agenda sorting of deadline itemsv > 4.73

[Egli Christian (KIRO 41)]

Hi Eric

> In both examples it is set to
> ((agenda time-up category-keep priority-down)

> Under 5.16a priorities

> >> Thursday  31 January 2008
> 1100>> deadline-order-bug:In -730 d.:  Jan One DEADLINE: <2006-01-31
Thu>
> 1100>> deadline-order-bug:In -365 d.:  Jan Two DEADLINE: <2007-01-31
Thu>
> 1100>> deadline-order-bug:Deadline:   Jan Three DEADLINE: <2008-01-31
Thu>
> 1100>> deadline-order-bug:In -715 d.:  Feb One DEADLINE: <2006-02-15
Thu>
> 1100>> deadline-order-bug:In -350 d.:  Feb Two DEADLINE: <2007-02-15
Thu>
> 1009>> deadline-order-bug:In  15 d.:  Feb Three DEADLINE: <2008-02-15
Thu>
> 1009>> deadline-order-bug:In 366 d.:  Jan Four DEADLINE: <2009-01-31
Thu>
> 1006>> deadline-order-bug:In 381 d.:  Feb Four DEADLINE: <2009-02-15
Thu>

> Under 4.67c priorites are

> >> Thursday  31 January 2008
> 1740>> deadline-order-bug:In -730 d.:  Jan One DEADLINE: <2006-01-31
Thu>
> 1725>> deadline-order-bug:In -715 d.:  Feb One DEADLINE: <2006-02-15
Thu>
> 1375>> deadline-order-bug:In -365 d.:  Jan Two DEADLINE: <2007-01-31
Thu>
> 1360>> deadline-order-bug:In -350 d.:  Feb Two DEADLINE: <2007-02-15
Thu>
> 1100>> deadline-order-bug:Deadline:   Jan Three DEADLINE: <2008-01-31
Thu>
>   995>> deadline-order-bug:In  15 d.:  Feb Three DEADLINE: <2008-02-15
Thu>
>   644>> deadline-order-bug:In 366 d.:  Jan Four DEADLINE: <2009-01-31
Thu>
>   629>> deadline-order-bug:In 381 d.:  Feb Four DEADLINE: <2009-02-15
Thu>

> Maybe someone else can duplicate this behavior with the org file that
follows?

Hm, the 4.67c behaviour seems a bit more sensible as it incorporates the
number of days that a deadline is delayed into the priority calculation.
Have a look at the function org-agenda-get-deadlines where the priority
of a deadline is calculated. Specifically the following code:

:       (setq s (match-string 1)
:             pos (1- (match-beginning 1))
:             d2 (org-time-string-to-absolute (match-string 1) d1)
:             diff (- d2 d1)
:             wdays (org-get-wdays s)
:             dfrac (/ (* 1.0 (- wdays diff)) wdays)
:             upcomingp (and todayp (> diff 0)))

and 

:                 'priority (+ (if upcomingp (floor (* dfrac 10.)) 100)
:                              (org-get-priority txt))

You might be able to tweak this to get the desired behaviour.

Hope that helps
Christian