From 09e0a98b7e8a7a0c9b3443917dcdb1bddf4c2df7 Mon Sep 17 00:00:00 2001 From: Steven Phillips Date: Wed, 18 Sep 2024 01:16:16 +0100 Subject: [PATCH] Fixed new file edit issue --- microemacs/macros/ehftools.emf | 9 --------- microemacs/src/file.c | 2 +- 2 files changed, 1 insertion(+), 10 deletions(-) diff --git a/microemacs/macros/ehftools.emf b/microemacs/macros/ehftools.emf index f796cb16..44383a6d 100755 --- a/microemacs/macros/ehftools.emf +++ b/microemacs/macros/ehftools.emf @@ -7,11 +7,9 @@ ; Synopsis: On-line help macros. ; Authors: Steven Phillips ; --2 ml-write "HERE 1" 0 define-macro-file utils ascii-time var-str-sub str-to-regex define-macro-file htmltool html-to-ehf define-macro-file format clean --2 ml-write "HERE 2" define-macro ehf-process-buffer ; Carry on as normal @@ -150,22 +148,17 @@ define-macro ehf-process-buffer !emacro define-macro ehf-process-all --2 ml-write "HERE A1" !force 0 delete-buffer "*scratch*" delete-other-windows split-window-vertically --2 ml-write "HERE A2" find-file "me.ehf" beginning-of-buffer set-mark end-of-buffer -1 kill-region --2 ml-write "HERE A3" next-window !while ¬ &seq $buffer-bname "me.ehf" --2 ml-write "HERE A4" ehf-process-buffer --2 ml-write "HERE A5" beginning-of-buffer set-mark !while &seq @wc "#" @@ -296,8 +289,6 @@ define-macro ehf-process-all ; don't advertise the definition of start-up 0 define-macro start-up --2 ml-write "HERE 3" ehf-process-all --2 ml-write "HERE 4" quick-exit !emacro diff --git a/microemacs/src/file.c b/microemacs/src/file.c index 28924e1b..2dc85087 100755 --- a/microemacs/src/file.c +++ b/microemacs/src/file.c @@ -904,7 +904,7 @@ bufferOutOfDate(meBuffer *bp) if(ft & (meIOTYPE_TFS|meIOTYPE_HTTP|meIOTYPE_FTP|meIOTYPE_FTPE)) return 0; if(ft & meIOTYPE_NOTEXIST) - return -1; + return ((meFiletimeIsSet(bp->stats.stmtime)) ? -1:0); if(meFiletimeIsSame(stats.stmtime,bp->stats.stmtime)) return 0; return ((meFiletimeIsModified(stats.stmtime,bp->stats.stmtime)) ? 2:1);