Mercurial > emacs
annotate lib-src/=wakeup.c @ 2076:5140299129c3
(rmail-delete-forward): Go to summary buf to change D mark.
Always do the motion in the rmail buffer; let that handle summary.
(rmail-undelete-previous-message): Likewise.
(rmail-select-summary): New macro.
(rmail-show-message): Use rmail-select-summary.
(rmail-get-new-mail): Likewise.
(rmail-expunge): Likewise.
(rmail-bury): Record Rmail buffer to bury it later.
Major changes from Bob Weiner <weiner@pts.mot.com>
Handle some Emacs 18 function names to run in 18.
This is to facilitate working with Weiner.
(rmail-reply-prefix): New variable.
(rmail-reply): Use that variable to add to subject.
(rmail-retry-failure): Change binding to M-m.
(rmail-forward): Look for >From as well as for From.
Handle case where neither is found.
(rmail-last-regexp): New variable.
(rmail-mode): Make rmail-last-regexp local.
(rmail): Don't update rmail-mode data for old buffer
if it's not in rmail mode.
Error if in Rmail Edit mode.
(rmail-bury): New command, plus key binding.
(rmail-summary-by-topic): New key binding.
(rmail-insert-inbox-text): Check for pop case earlier.
(rmail-convert-to-babyl-format): Handle Content-Length field.
(rmail-maybe-display-summary): New function.
(rmail-redisplay-summary): New user option.
(rmail-undelete-previous-message, rmail-delete-forward):
(rmail-get-new-mail, rmail-show-message): Update summary buffer if any.
Call rmail-maybe-display-summary to put it back on screen.
(rmail-only-expunge): Renamed from rmail-expunge.
(rmail-expunge): New function.
(rmail-message-recipients-p, rmail-message-regexp-p): New functions.
(rmail-summary-exists, rmail-summary-displayed): New functions.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 09 Mar 1993 08:08:13 +0000 |
parents | f756ede77561 |
children | 44df7395bed8 |
rev | line source |
---|---|
77 | 1 /* Program to produce output at regular intervals. */ |
2 | |
3 #include <stdio.h> | |
4 #include <time.h> | |
5 | |
6 struct tm *localtime (); | |
7 | |
8 main (argc, argv) | |
9 int argc; | |
10 char **argv; | |
11 { | |
12 int period = 60; | |
13 long when; | |
14 struct tm *tp; | |
15 | |
16 if (argc > 1) | |
17 period = atoi (argv[1]); | |
18 | |
19 while (1) | |
20 { | |
366 | 21 /* Make sure wakeup stops when Emacs goes away. */ |
22 if (getppid () == 1) | |
23 exit (0); | |
77 | 24 printf ("Wake up!\n"); |
25 fflush (stdout); | |
26 /* If using a period of 60, produce the output when the minute | |
27 changes. */ | |
28 if (period == 60) | |
29 { | |
30 time (&when); | |
31 tp = localtime (&when); | |
32 sleep (60 - tp->tm_sec); | |
33 } | |
34 else | |
35 sleep (period); | |
36 } | |
37 } |