[Emacs-diffs] emacs/lib-src ChangeLog movemail.c

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/02/11 03:59:52

Modified files:
        lib-src        : ChangeLog movemail.c 

Log message:
        (mbx_delimit_begin): Also write the current time.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lib-src/ChangeLog?cvsroot=emacs&r1=2.518&r2=2.519
http://cvs.savannah.gnu.org/viewcvs/emacs/lib-src/movemail.c?cvsroot=emacs&r1=1.98&r2=1.99

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lib-src/ChangeLog,v
retrieving revision 2.518
retrieving revision 2.519
diff -u -b -r2.518 -r2.519
--- ChangeLog   10 Feb 2009 03:30:39 -0000      2.518
+++ ChangeLog   11 Feb 2009 03:59:52 -0000      2.519
@@ -1,3 +1,7 @@
+2009-02-11  Glenn Morris  <address@hidden>
+
+       * movemail.c (mbx_delimit_begin): Also write the current time.
+
 2009-02-10  Glenn Morris  <address@hidden>
 
        * movemail.c (mbx_delimit_begin, mbx_delimit_end): Write mbox rather

Index: movemail.c
===================================================================
RCS file: /sources/emacs/emacs/lib-src/movemail.c,v
retrieving revision 1.98
retrieving revision 1.99
diff -u -b -r1.98 -r1.99
--- movemail.c  10 Feb 2009 03:30:41 -0000      1.98
+++ movemail.c  11 Feb 2009 03:59:52 -0000      1.99
@@ -683,6 +683,8 @@
 #include <winsock.h>
 #endif
 #include <pwd.h>
+#include <string.h>
+#include <time.h>
 
 #define NOTOK (-1)
 #define OK 0
@@ -923,7 +925,16 @@
 mbx_delimit_begin (mbf)
      FILE *mbf;
 {
-  if (fputs ("From movemail\n", mbf) == EOF)
+  time_t now;
+  struct tm *ltime;
+  char fromline[40] = "From movemail ";
+
+  now = time (NULL);
+  ltime = localtime (&now);
+
+  strcat (fromline, asctime (ltime));
+
+  if (fputs (fromline, mbf) == EOF)
     return (NOTOK);
   return (OK);
 }