annotate debian/gnus.el @ 390:2ad4c1c97734 noffle

[svn] * src/client.c: Return correct status from Client_postArt() and add function comment detailing what return code should be, because it's not obvious that the return code should report success when the posting failed for reasons other than connection problems. This should fix problem with failing posting stopping fetches. Thanks to Dan Jacobson for spotting this. * src/client.c: Fix problemette with filter discards not updating remote group article count and so the overview being refetched until and article appears that doesn't fall foul of the filter and thus does update the remove group 'next article' marker. Thanks to Dan Jacobson for spotting this. * src/content.c: Don't be fooled into thinking a filename starting ".." is just "..". * src/outgoing.c: Don't assume "." and ".." are the first files returned from readdir(). Thanks to Andreas Happe for spotting this. * src/noffle.c: Update online help to include 'm' group posting status. * src/server.c: Move incorrect updating of server.grp in doGrp() which was causing doGrp() to not retrieve remote article details when in online mode. Thanks to Miernik and Andreas Happe for reporting the problem.
author bears
date Thu, 22 May 2003 10:04:38 +0100
parents 3b5b7f3fd71f
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
301
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
1 ;; Customising Gnus for use with the NOFFLE news server
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
2 ;;
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
3 ;; tick and open article
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
4 ;; for reading/marking for download
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
5 ;; scroll article text circular
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
6 ;; for avoiding automatic opening of next article
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
7 ;; mark article as read and go to next line
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
8 (defun my-gnus-summary-tick-and-open(n)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
9 "Tick and open article, so that NOFFLE marks it for download"
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
10 (interactive "p")
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
11 (gnus-summary-scroll-up n)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
12 (gnus-summary-mark-article nil gnus-ticked-mark t)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
13 )
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
14 (defun my-gnus-summary-next-page(n)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
15 "Next page of article, but do not open next article automatically"
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
16 (interactive "p")
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
17 (gnus-summary-next-page 10 t) ;; Call with argument `circular'.
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
18 )
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
19 (defun my-gnus-summary-mark-read-next-line(n)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
20 "Mark article as read and go to next line"
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
21 (interactive "p")
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
22 (gnus-summary-mark-article-as-read gnus-read-mark)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
23 (next-line n)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
24 )
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
25 (defun my-gnus-summary-mode-hook ()
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
26 (define-key gnus-summary-mode-map "\r"
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
27 'my-gnus-summary-tick-and-open)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
28 (define-key gnus-summary-mode-map " "
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
29 'my-gnus-summary-next-page)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
30 (define-key gnus-summary-mode-map "d"
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
31 'my-gnus-summary-mark-read-next-line)
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
32 )
3b5b7f3fd71f [svn] initial debian/ upload
godisch
parents:
diff changeset
33 (add-hook 'gnus-summary-mode-hook 'my-gnus-summary-mode-hook)