Annotation of parser3/src/www/htdocs/auto.p, revision 1.23
1.23 ! parser 1: @main[]
! 2: ^header[]
! 3: ^print_path[]
! 4: ^print_menu[]
! 5: ^body[]
! 6: ^hr[]
! 7: ^footer[]
! 8:
! 9:
! 10: @header[]
! 11: <!-- Copyright 2001 (c) Vladimir Eltchinov | elik@elik.ru | http://www.elik.ru/ -->
! 12:
! 13: <html><head>
! 14: #^macro[load_config]
! 15: <title>^print_header[]</title><base target="_top"></head>
! 16: <body bgcolor=#$config.bg-color.value link=#$config.link-color.value vlink=#$config.vlink-color.value alink=#$config.alink-color.value text=#$config.text-color.value topmargin=5 leftmargin=5 rightmargin=5 marginwidth=5 marginheight=5 background=$config.bg-image.value>
! 17: <table width=100% height=100% align=center valign=top><tr><td width=50%></td><td width=600 valign=top>
! 18:
! 19: @body[]
! 20:
! 21: @footer[]
! 22: </td><td width=50%></td></tr><tr><td colspan=3 valign=bottom align=right><font size=-1><b>The matrix has you ...</b></font></td></tr></table>
! 23: </body>
! 24: </html>
! 25:
! 26:
! 27: @i[]
! 28: $result[$config.images.value]
! 29:
! 30: @hr[]
! 31: <br><img src=^i[]hr.gif width=600 height=1><br><br>
! 32:
1.20 paf 33: @auto[]
1.23 ! parser 34: $DEFAULTS[
! 35: $content-type[
! 36: $value[text/html]
! 37: $charset[koi8-r]
! 38: ]
1.21 paf 39: ]
1.23 ! parser 40:
! 41: #$config_table[^table:load[/layout.cfg]]
! 42: #$config[^config_table.hash[name][value]]
! 43:
! 44: @print_path[][p;path;links;prefix;location] Печатает строку навигации "Корень / раздел / раздел"
! 45: $p[$request:uri]
! 46: $path[^p.lsplit[/]]
! 47: ^path.flip[]
! 48: ^path.menu{
! 49: ^if("$prefix" eq ""){
! 50: ^if($p eq "/"){<b>Elik.Ru</b>}{<a href=/><b>Elik.Ru</b></a>}
! 51: }{
! 52: ^if(-f "${prefix}links.cfg"){
! 53:
! 54: $links[^table:load[${prefix}links.cfg]]
! 55: $links[^links.hash[location;description]]
! 56:
! 57: $location[$path.0]
! 58: ^if($p eq "${prefix}$location/"){$links.$location.description}{<a href=${prefix}$location>$links.$location.description</a>}
! 59: }
! 60: }
! 61: $prefix[${prefix}$location/]
! 62: }[ ^;/ ^;]<br>^hr[]
! 63:
! 64: @print_header[][p;path;links;prefix;location] Печатает строку заголовка "Корень | раздел | раздел"
! 65: $p[$request:uri]
! 66: $path[^p.lsplit[/]]
! 67: ^path.flip[]
! 68: ^path.menu{
! 69: ^if("$prefix" eq ""){
! 70: Elik.Ru
! 71: }{
! 72: ^if(-f "${prefix}links.cfg"){
! 73:
! 74: $links[^table:load[${prefix}links.cfg]]
! 75: $links[^links.hash[location;description]]
! 76:
! 77: $location[$path.0]
! 78: $links.$location.description
! 79: }
! 80: }
! 81: $prefix[${prefix}$location/]
! 82: }[ ^;| ^;]
! 83:
! 84: @print_menu[][links]
! 85: ^if(-f links.cfg){
! 86: $links[^table:load[links.cfg]]
! 87: $links{^menu{
! 88: <a href=$location>$description</a>^if($:menu_separator ne ""){$:menu_separator}{<br>}
! 89: }}
! 90: ^hr[]
! 91: }
1.1 paf 92:
E-mail: