diff options
| author | Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com> | 2016-10-22 13:20:24 -0400 |
|---|---|---|
| committer | Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com> | 2016-10-22 13:20:24 -0400 |
| commit | ef4863661495fd5c8a570b3233eb7581040e69cb (patch) | |
| tree | 13caa36ae5c736c274f6388577d5f56d4bb50f03 /link.bas | |
| parent | 01b00fb56dbd59782d2b2334b0e0c13bc2d41e09 (diff) | |
| download | gwblog-ef4863661495fd5c8a570b3233eb7581040e69cb.tar.gz gwblog-ef4863661495fd5c8a570b3233eb7581040e69cb.zip | |
Added list of all posts and fixed bugs in link list generation. Added creation of an index file.
Diffstat (limited to 'link.bas')
| -rw-r--r-- | link.bas | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3,7 +3,7 @@ 19002 REM 19003 REM INPUT - LINKURL$ - URL 19004 REM LINKLBL$ - Label -19005 REM OUTPUT - LINKHTM$ - HTML link +19005 REM OUTPUT - LINKHTML$ - HTML link 19006 REM ============================== 19010 REM Check if the extension of a URL is TXT and change it 19020 EXTI = INSTR(LINKURL$, ".TXT") + INSTR(LINKURL$, ".txt") @@ -25,7 +25,7 @@ 19130 LINKURL$ = URLS$[IU] 19140 LINKLBL$ = LBLS$[IU] 19150 GOSUB 19000 -19160 HTMLLST$ = HTMLLST$+"<LI>"+LINKHTM$+"</LI>" +19160 HTMLLST$ = HTMLLST$+"<LI>"+LINKHTML$+"</LI>" 19170 NEXT IU 19180 HTMLLST$ = HTMLLST$ + "</UL>" 19190 RETURN |