Show
Ignore:
Timestamp:
10/23/07 08:49:04 (6 years ago)
Author:
cho45
Message:

lang/vim/blosxom.vim.cgi,
lang/vim/blosxom.vim.cgi/foot.html,
lang/vim/blosxom.vim.cgi/head.html,
lang/vim/blosxom.vim.cgi/story.html,
lang/vim/blosxom.vim.cgi/template.html,
lang/vim/blosxom.vim.cgi/blosxom.vim.cgi:

blosxom.vim.cgi is a blosxom clone on vim script.

Location:
lang/vim/blosxom.vim.cgi
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • lang/vim/blosxom.vim.cgi/blosxom.vim.cgi

    r606 r621  
    1414 
    1515set hidden 
    16 set termencoding=utf-8 
    17 set encoding=utf-8 
    18 set fileencodings=utf-8 
    19 set fileencoding=utf-8 
    2016 
    2117function Inspect(obj) 
    … …  
    3228endfunction 
    3329 
    34 call Template("head.html", {"title": "This is Vim.", "home": $SCRIPT_NAME}) 
     30call Template("head.html", {"title": "This is Vim."}) 
    3531 
    3632 
    … …  
    4238 
    4339call Inspect($PATH_INFO) 
    44 call Inspect($SCRIPT_NAME) 
    45  
    46  
    4740call Out(strftime("%Y-%m-%d %H:%M:%S\n")) 
    48  
    49  
    50 function FilteringByPathInfo(entries) 
    51         let pathinfo = split($PATH_INFO, "/") 
    52         call Inspect(pathinfo) 
    53         if len(pathinfo) > 0 
    54                 call Inspect(str2nr(pathinfo[0])) 
    55                 if str2nr(pathinfo[0]) == 0 
    56                         call Inspect("path") 
    57                         call filter(a:entries, '!match(v:val["name"], "^'.$PATH_INFO.'")') 
    58                 else 
    59                         "call Inspect('strftime("%Y", v:val["time"]) == '.string(pathinfo[0])) 
    60                         call filter(a:entries, 'strftime("%Y", v:val["time"]) == '.string(pathinfo[0])) 
    61                         if len(pathinfo) > 1 
    62                                 call filter(a:entries, 'strftime("%m", v:val["time"]) == '.string(pathinfo[1])) 
    63                                 if len(pathinfo) > 2 
    64                                         call filter(a:entries, 'strftime("%d", v:val["time"]) == '.string(pathinfo[2])) 
    65                                 end 
    66                         endif 
    67                 endif 
    68         endif 
    69 endfunction 
    70  
    7141let files = split(glob("data/**/*.txt"), "\n") 
    7242let entries = sort(map(files, '{"path": v:val, "time": getftime(v:val)}'), "CompareByTime") 
    … …  
    7545        let ent["title"] = file[0] 
    7646        let ent["body"] = join(file[1:], "\n") 
    77         let ent["name"] = substitute(ent["path"], '^data\|.[^.]*$', "", "g") 
     47        let ent["name"] = substitute(ent["path"], '^data\|.[^.]*$', "", "") 
    7848        let ent["date"] = strftime("%Y-%m-%d %H:%M:%S", ent["time"]) 
    79         let ent["home"] = $SCRIPT_NAME 
     49        let ent["home"] = $SCRIPT_NAME ? $SCRIPT_NAME : "" 
    8050        let ent["path"] = join(split(ent["home"], "/")[0:-1], "/") 
    81 endfor 
    82  
    83 call FilteringByPathInfo(entries) 
    84  
    85 for ent in entries 
     51        " call Out(ent["title"] . " " . ent["path"] . "\n") 
    8652        call Template("story.html", ent) 
    8753endfor 
    … …  
    9258silent exe "w " . tempname() 
    9359silent exe "!cat %" 
    94 "silent echo join(getline(1, line("$")), "\n") 
    9560q! 

  • lang/vim/blosxom.vim.cgi/head.html

    r606 r621  
    22<html xmlns="http://www.w3.org/1999/xhtml"> 
    33        <head> 
    4                 <title>#{title}</title> 
     4                <title></title> 
    55                <style type="text/css"> 
    66                        body { 
    … …  
    6161        <body> 
    6262                <div id="whole"> 
    63                         <h1 id="top"><a href="#{home}/">#{title}</a></h1> 
     63                        <h1 id="top"><a href="/">#{title}</a></h1> 
    6464 
    6565                        <div id="content">