view nt/ftime.bat @ 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 93ce5f375b46
children 375f2633d815 ef719132ddfa
line wrap: on
line source

@echo off
if (%1)==() echo Usage: %0 tracefile
if (%1)==() goto done
rem Need to fiddle with the dumped image so prep doesn't break it
obj\i386\preprep ..\src\obj\i386\emacs.exe ..\src\obj\i386\pemacs.exe
copy ..\src\obj\i386\temacs.map ..\src\obj\i386\pemacs.map
rem -----------------------------------------------------------------
rem    Use this version to profile explicit commands only.
prep /om /ft /sf _Fexecute_extended_command ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
rem    Use this version to ignore startup code
rem prep /om /ft /sf _command_loop_1 ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
rem    Use this version to include startup code
rem prep /om /ft ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
if errorlevel 1 goto done
profile ..\src\obj\i386\pemacs %2 %3 %4 %5 %6 %7 %8 %9
if errorlevel 1 goto done
prep /m  ..\src\obj\i386\pemacs
if errorlevel 1 goto done
plist ..\src\obj\i386\pemacs > %1
:done

goto skipArchTag
   arch-tag: d1c629de-9172-4d72-ab68-9d45ab9903cc
:skipArchTag