From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/10695 Path: main.gmane.org!not-for-mail From: Aharon Schkolnik Newsgroups: gmane.emacs.gnus.general Subject: PATCH: Skip over ticked articles in summary buffer Date: 15 Apr 1997 10:55:55 +0300 Sender: aharon@healdb.matat.health.gov.il Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035150521 25808 80.91.224.250 (20 Oct 2002 21:48:41 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 21:48:41 +0000 (UTC) Return-Path: Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.8.5/8.8.5) with SMTP id BAA10660 for ; Tue, 15 Apr 1997 01:07:53 -0700 Original-Received: from healdb.matat.health.gov.il (mail2.health.gov.il [199.203.49.196]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) id for ; Tue, 15 Apr 1997 09:52:29 +0200 Original-Received: (qmail 29059 invoked by uid 12); 15 Apr 1997 07:55:56 -0000 Original-To: Gnus Mailing List In-Reply-To: Aharon Schkolnik's message of 15 Apr 1997 09:36:36 +0300 Original-Lines: 112 X-Mailer: Gnus v5.4.37/XEmacs 19.15 Xref: main.gmane.org gmane.emacs.gnus.general:10695 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:10695 Hi. I couldn't get anyone else to do it, so I did it myself :-) The idea (and the patch) is simple: an option to allow you to enter the summary buffer with the cursor positioned over the first unread article, but without selecting the article. This is the way I like to work, and it seems there are others who feel the same way. What I did was add a simple function (which I called gnus-summary-goto-first-unread-article) which I stole mostly from gnus-summary-first-article, and make a small change to gnus-summary-read-group-1. The new option is invoked by setting gnus-auto-select-first to 'position. First of all, I would like to receive comments and suggestions on my patch. I will then attempt to improve it as much as possible. Lastly, I would like to know if this option could be integrated into gnus. Here's the patch: *** private-gnus-sum.el Tue Apr 15 08:57:27 1997 --- /usr/local/lib/xemacs-19.15/lisp/gnus/gnus-sum.el Wed Mar 26 07:33:23 1997 *************** *** 2601,2609 **** gnus-auto-select-first) (unless (if (eq gnus-auto-select-first 'best) (gnus-summary-best-unread-article) ! (if (eq gnus-auto-select-first 'position) ! (gnus-summary-goto-first-unread-article) ! (gnus-summary-first-unread-article))) (gnus-configure-windows 'summary)) ;; Don't select any articles, just move point to the first ;; article in the group. --- 2601,2607 ---- gnus-auto-select-first) (unless (if (eq gnus-auto-select-first 'best) (gnus-summary-best-unread-article) ! (gnus-summary-first-unread-article)) (gnus-configure-windows 'summary)) ;; Don't select any articles, just move point to the first ;; article in the group. *************** *** 8660,8681 **** "Update summary buffer %s? " (lambda (buf) (switch-to-buffer buf) (gnus-summary-exit)) buffers))))) - - (defun gnus-summary-goto-first-unread-article () - "Goto, (but do not select) the first unread article. - Return nil if there are no unread articles." - (interactive) - (gnus-set-global-variables) - (prog1 - (when (gnus-summary-first-subject t) - (gnus-summary-show-thread) - (gnus-summary-first-subject t) - ) - (gnus-summary-position-point) - (gnus-set-mode-line 'summary) - (gnus-configure-windows 'summary 'force) - ) - ) (provide 'gnus-sum) --- 8658,8663 ---- >>>>> "Me" == Aharon Schkolnik writes: Me> Hi. Me> Most of my groups have a number of ticked articles in Me> them. When I enter the summary buffer from the group buffer Me> (gnus-topic-select-group), I usually want to skip right over Me> those ticked articles to get to the ones I haven't read Me> yet. Is there a way to get gnus to do this automatically ? If Me> not, can someone help me try to write some code to do this ? Me> In fact, this probably should be considered a feature Me> request. Anyone else agree ? Me> TIA. Me> -- The day is short, and the work is great, | Aharon Schkolnik Me> and the laborers are lazy, and the reward | Me> Aharon@Health.Gov.IL is great, and the Master of the house is Me> | impatient. - Ethics Of The Fathers Ch. 2 | -- The day is short, and the work is great, | Aharon Schkolnik and the laborers are lazy, and the reward | Aharon@Health.Gov.IL is great, and the Master of the house is | impatient. - Ethics Of The Fathers Ch. 2 | -- The day is short, and the work is great, | Aharon Schkolnik and the laborers are lazy, and the reward | Aharon@Health.Gov.IL is great, and the Master of the house is | impatient. - Ethics Of The Fathers Ch. 2 |