From: Reiner Steib Date: Tue, 4 Dec 2007 18:21:59 +0000 (+0000) Subject: (gnus-group-highlight-line): Add FIXME. X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=deae55005518481a1090d817fde571a264b1d5db;p=gnus (gnus-group-highlight-line): Add FIXME. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8d843a32a..079a7d5d9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2007-12-04 Reiner Steib + * gnus-group.el (gnus-group-highlight-line): Add FIXME. + * gnus-dired.el: Reduce Gnus dependencies. (gnus-ems, gnus-msg, gnus-util, message, mm-decode, mml): Don't require. Use autoloads instead. diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index 942a1cf49..7d2489582 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -1655,6 +1655,24 @@ if it is a string, only list groups matching REGEXP." (ticked (gnus-range-length (cdr (assq 'tick marked)))) (group-age (gnus-group-timestamp-delta group)) (inhibit-read-only t)) + ;; FIXME: http://thread.gmane.org/gmane.emacs.gnus.general/65451/focus=65465 + ;; ====================================================================== + ;; From: Richard Stallman + ;; Subject: Re: Rewriting gnus-group-highlight-line (was: [...]) + ;; Cc: ding@gnus.org + ;; Date: Sat, 27 Oct 2007 19:41:20 -0400 + ;; Message-ID: + ;; + ;; [...] + ;; The kludge is that the alist elements contain expressions that refer + ;; to local variables with short names. Perhaps write your own tiny + ;; evaluator that handles just `and', `or', and numeric comparisons + ;; and just a few specific variables. + ;; ====================================================================== + ;; + ;; Similar for other evaluated variables. Grep for risky-local-variable + ;; to find them! -- rsteib + ;; ;; Eval the cars of the lists until we find a match. (while (and list (not (eval (caar list))))