I do
(defun alpha-org-priority-score (&optional sg)
(case (alpha-org-entry-priority-letter sg)
(?A 2)
(?B 0)
(?C -1)
(t (error "Case exhausted for priority"))))-- The Kafka Pandemic: http://thekafkapandemic.blogspot.com I support the Whittemore-Peterson Institute (WPI) === Extreme bigotry against people with deadly serious diseases is still extreme bigotry.
