X-Git-Url: https://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=archivedir;fp=archivedir;h=de405552b02d8e8971b002fa50175e836b202552;hb=1195759f18d76c5163cf037f2b13df4aa6408ee6;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 ""
append yearindex [nextyearlink [lindex $yearlist [expr $i+1]]]
- append yearindex " | "
+ append yearindex " | back | "
append yearindex [nextyearlink [lindex $yearlist [expr $i-1]]]
append yearindex " | |
$title\n"
set dircount [llength $a($y)]
|