X-Git-Url: http://www.wagner.pp.ru/gitweb/?a=blobdiff_plain;f=archivedir;h=de405552b02d8e8971b002fa50175e836b202552;hb=HEAD;hp=7bc4e1c052b8a5e7a3e6995ac841adb7116e3c4b;hpb=39528768257d18afdf14573cad2f4f2099bdd1b8;p=oss%2Fimgwww.git diff --git a/archivedir b/archivedir index 7bc4e1c..de40555 100755 --- a/archivedir +++ b/archivedir @@ -60,9 +60,9 @@ for {set i 0} {$i<[llength $yearlist]} {incr i} { set y [lindex $yearlist $i] set title "\u0424\u043e\u0442\u043e\u0430\u0440\u0445\u0438\u0432 $y \u0433\u043e\u0434" set yearindex "$title" - append yearindex "
" + append yearindex "

$title

\n
    " set dircount [llength $a($y)]
" append yearindex [nextyearlink [lindex $yearlist [expr $i+1]]] - append yearindex "" + append yearindex "back" append yearindex [nextyearlink [lindex $yearlist [expr $i-1]]] append yearindex "