From 5185d4e34e362d183a2c88a894ecb6f76db437f0 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com>
Date: Wed, 19 Oct 2016 20:07:17 -0400
Subject: Additional bug fixes for blog engine.  Batch file now launches site
 generator.

---
 post.bas | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'post.bas')

diff --git a/post.bas b/post.bas
index f61c3c6..d4edeeb 100644
--- a/post.bas
+++ b/post.bas
@@ -5,8 +5,8 @@
 5004 REM         LC List length
 5005 REM         FINDEX File to build
 5006 REM         DIREC$ Posts src dir
-5007 REM         HFILE$ Header template
-5008 REM         FFILE$ Footer template
+5007 REM         HDRFILE$ Header template
+5008 REM         FTRFILE$ Footer template
 5009 REM         OUTFILE$ Output file
 5010 REM         LBL$ Template labels
 5011 REM         REPL$ Template 
@@ -17,7 +17,7 @@
 5020 OPEN OUTFILE$ FOR OUTPUT AS #13
 
 5030 REM Header template right now
-5040 TMPLATE$ = HFILE$
+5040 TMPLATE$ = HDRFILE$
 5050 FOR I = 1 TO ILBL
 5060     IF LBL$[I] = "title" THEN REPL$[I] = TIT$[FINDEX]
 5070     IF LBL$[I] <> "next" THEN 5100
@@ -43,7 +43,7 @@
 5600 SHELL "DEL WORK.TMP"
 
 5700 REM Process the footer
-5710 TMPLATE$ = FFILE$
+5710 TMPLATE$ = FTRFILE$
 5720 GOSUB 18000
 5730 PRINT#13, TTEXT$
 
@@ -55,8 +55,8 @@
 6001 REM Build a regular page
 6002 REM INPUT - TFILE$ Page file
 6003 REM         PTITL$ Page title
-6004 REM         HFILE$ Header template
-6005 REM         FFILE$ Footer template
+6004 REM         HDRFILE$ Header template
+6005 REM         FTRFILE$ Footer template
 6006 REM         OUTFILE$ Output file
 6007 REM         LBL$ Template labels
 6008 REM         REPL$ Template 
@@ -67,9 +67,9 @@
 6020 OPEN OUTFILE$ FOR OUTPUT AS #13
 
 6030 REM Header template right now
-6040 TMPLATE$ = HFILE$
+6040 TMPLATE$ = HDRFILE$
 6050 FOR I = 1 TO ILBL
-6060     IF LBL$[I] = "title" THEN LBL$[I] = PTITL$:GOTO 5080
+6060     IF LBL$[I] = "title" THEN REPL$[I] = PTITL$:GOTO 6080
 6070 NEXT I
 6080 GOSUB 18000
 6090 PRINT#13, TTEXT$
@@ -86,7 +86,7 @@
 6190 SHELL "DEL WORK.TMP"
 
 6200 REM Process the footer
-6210 TMPLATE$ = FFILE$
+6210 TMPLATE$ = FTRFILE$
 6220 GOSUB 18000
 6230 PRINT#13, TTEXT$
 
-- 
cgit v1.2.3