annotate update-subdirs @ 110410:f2e111723c3a

Merge changes made in Gnus trunk. Reimplement nnimap, and do tweaks to the rest of the code to support that. * gnus-int.el (gnus-finish-retrieve-group-infos) (gnus-retrieve-group-data-early): New functions. * gnus-range.el (gnus-range-nconcat): New function. * gnus-start.el (gnus-get-unread-articles): Support early retrieval of data. (gnus-read-active-for-groups): Support finishing the early retrieval of data. * gnus-sum.el (gnus-summary-move-article): Pass the move-to group name if the move is internal, so that nnimap can do fast internal moves. * gnus.el (gnus-article-special-mark-lists): Add uid/active tuples, for nnimap usage. * nnimap.el: Rewritten. * nnmail.el (nnmail-inhibit-default-split-group): New internal variable to allow the mail splitting to not return a default group. This is useful for nnimap, which will leave unmatched mail in the inbox. * utf7.el (utf7-encode): Autoload. Implement shell connection. * nnimap.el (nnimap-open-shell-stream): New function. (nnimap-open-connection): Use it. Get the number of lines by using BODYSTRUCTURE. (nnimap-transform-headers): Get the number of lines in each message. (nnimap-retrieve-headers): Query for BODYSTRUCTURE so that we get the number of lines. Not all servers return UIDNEXT. Work past this problem. Remove junk from end of file. Fix typo in "bogus" section. Make capabilties be case-insensitive. Require cl when compiling. Don't bug out if the LIST command doesn't have any parameters. 2010-09-17 Knut Anders Hatlen <kahatlen@gmail.com> (tiny change) * nnimap.el (nnimap-get-groups): Don't bug out if the LIST command doesn't have any parameters. (mm-text-html-renderer): Document gnus-article-html. 2010-09-17 Julien Danjou <julien@danjou.info> (tiny fix) * mm-decode.el (mm-text-html-renderer): Document gnus-article-html. * dgnushack.el: Define netrc-credentials. If the user doesn't have a /etc/services, supply some sensible port defaults. Have `unseen-or-unread' select an unread unseen article first. (nntp-open-server): Return whether the open was successful or not. Throughout all files, replace (save-excursion (set-buffer ...)) with (with-current-buffer ... ). Save result so that it doesn't say "failed" all the time. Add ~/.authinfo to the default, since that's probably most useful for users. Don't use the "finish" method when we're reading from the agent. Add some more nnimap-relevant agent stuff to nnagent.el. * nnimap.el (nnimap-with-process-buffer): Removed. Revert one line that was changed by mistake in the last checkin. (nnimap-open-connection): Don't error out when we can't make a connection nnimap-related changes to avoid bugging out if we can't contact a server. * gnus-start.el (gnus-get-unread-articles): Don't try to scan groups from methods that are denied. * nnimap.el (nnimap-possibly-change-group): Return nil if we can't log in. (nnimap-finish-retrieve-group-infos): Make sure we're not waiting for nothing. * gnus-sum.el (gnus-select-newsgroup): Indent.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Sat, 18 Sep 2010 10:02:19 +0000
parents 1d1d5d9bd884
children 376148b31b5e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
1 #!/bin/sh
Dave Love <fx@gnu.org>
parents:
diff changeset
2 # Write into $1/subdirs.el a list of subdirs of directory $1.
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
3
74370
7c327a7ce0e2 Add missing Copyright years.
Glenn Morris <rgm@gnu.org>
parents: 70121
diff changeset
4 # Copyright (C) 1994, 1995, 1997, 1999, 2001, 2002, 2003, 2004, 2005,
106815
1d1d5d9bd884 Add 2010 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 100959
diff changeset
5 # 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
94719
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
6
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
7 # This file is part of GNU Emacs.
94719
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
8
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
9 # GNU Emacs is free software: you can redistribute it and/or modify
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
10 # it under the terms of the GNU General Public License as published by
94719
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
11 # the Free Software Foundation, either version 3 of the License, or
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
12 # (at your option) any later version.
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
13
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
14 # GNU Emacs is distributed in the hope that it will be useful,
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
15 # but WITHOUT ANY WARRANTY; without even the implied warranty of
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
16 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
17 # GNU General Public License for more details.
94719
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
18
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
19 # You should have received a copy of the GNU General Public License
94719
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
20 # along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
1a762a842f80 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
21
36219
f440b9766968 Add copyright notice.
Gerd Moellmann <gerd@gnu.org>
parents: 25931
diff changeset
22
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
23 cd $1
Dave Love <fx@gnu.org>
parents:
diff changeset
24 for file in *; do
Dave Love <fx@gnu.org>
parents:
diff changeset
25 case $file in
25931
3ede6c50d7f5 also ignore CVS subdirs.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 25856
diff changeset
26 *.elc | *.el | term | RCS | CVS | Old | . | .. | =* | *~ | *.orig | *.rej)
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 47727
diff changeset
27 ;;
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
28 *)
Dave Love <fx@gnu.org>
parents:
diff changeset
29 if [ -d $file ]; then
99260
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
30 if [ "$file" = "obsolete" ]; then
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
31 subdirs="$subdirs \"$file\""
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
32 else
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
33 subdirs="\"$file\" $subdirs"
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
34 fi
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
35 fi
99260
80b866cd08a3 Put obsolete directory last.
Chong Yidong <cyd@stupidchicken.com>
parents: 95369
diff changeset
36 ;;
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
37 esac
Dave Love <fx@gnu.org>
parents:
diff changeset
38 done
Dave Love <fx@gnu.org>
parents:
diff changeset
39
Dave Love <fx@gnu.org>
parents:
diff changeset
40 if [ "x$subdirs" = x ]; then
Dave Love <fx@gnu.org>
parents:
diff changeset
41 rm -f subdirs.el
Dave Love <fx@gnu.org>
parents:
diff changeset
42 else
86200
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
43 rm -f subdirs.el~
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
44 echo ";; -*- no-byte-compile: t -*-
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
45 ;; In load-path, after this directory should come
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
46 ;; certain of its subdirectories. Here we specify them.
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
47 (normal-top-level-add-to-load-path '($subdirs))
54489
fbc008c6f0cc Add local variables to prevent byte-compiling.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 52401
diff changeset
48 ;; Local" "Variables:
fbc008c6f0cc Add local variables to prevent byte-compiling.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 52401
diff changeset
49 ;; version-control: never
fbc008c6f0cc Add local variables to prevent byte-compiling.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 52401
diff changeset
50 ;; no-byte-compile: t
86200
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
51 ;; End:" > subdirs.el~
95369
d147ddeb05f9 Don't touch subdirs.el if it is unchanged.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 94719
diff changeset
52 if cmp "subdirs.el" "subdirs.el~" >/dev/null 2>&1; then
d147ddeb05f9 Don't touch subdirs.el if it is unchanged.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 94719
diff changeset
53 :; # echo "subdirs.el unchanged";
d147ddeb05f9 Don't touch subdirs.el if it is unchanged.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 94719
diff changeset
54 else
86200
aa0de1ea4215 Atomically update subdirs.el.
Andreas Schwab <schwab@suse.de>
parents: 78277
diff changeset
55 mv subdirs.el~ subdirs.el
95369
d147ddeb05f9 Don't touch subdirs.el if it is unchanged.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 94719
diff changeset
56 fi
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
57 fi
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
58
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
59 # arch-tag: 56ebcf1b-5c30-4934-b0b4-72d374064704