annotate etc/images/gud/go.xpm @ 97967:cc9bb337ef7c

Fix the expunge command so that the current message index is correct. * pmail.el (pmail-expunge-counter): New variable (pmail-set-attribute): Canonicalize the calling sequence to index, attribute, state. (pmail-show-message, pmail-delete-message, pmail-undelete-previous-message, pmail-delete-forward, pmail-mark-message): Use the new canonical calling sequence. (pmail-only-expunge): Use the expunge counter to update the current message index. (pmail-expunge-callback): Simplify. Just count the expunged messages with a lower index than the current message index. * pmaildesc.el (pmail-desc-get-previous): Fix an "off by one" issue. (pmail-desc-set-attribute): Canonicalize the calling sequence to index, attribute, state. * pmailout.el (pmail-output-body-to-file): Use the canonical calling sequence.
author Paul Reilly <pmr@pajato.com>
date Wed, 03 Sep 2008 15:33:38 +0000
parents be635ea1cd02
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
66881
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
1 /* XPM */
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
2 static char * go_xpm[] = {
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
3 "24 24 3 1",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
4 " c None",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
5 ". c #000080800000",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
6 "X c #FFFFFFFFFFFF",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
7 " ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
8 " ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
9 " .......... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
10 " ............ ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
11 " .............. ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
12 " ................ ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
13 " .................. ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
14 " ......XX...XX....... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
15 " .....X..X.X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
16 " .....X....X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
17 " .....X....X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
18 " .....X....X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
19 " .....X.XX.X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
20 " .....X..X.X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
21 " .....X..X.X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
22 " .....X..X.X..X...... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
23 " ......XX...XX....... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
24 " .................. ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
25 " ................ ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
26 " .............. ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
27 " ............ ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
28 " .......... ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
29 " ",
be635ea1cd02 Old gud-remove icon.
Nick Roberts <nickrob@snap.net.nz>
parents:
diff changeset
30 " "};