[tests of more album stuff, and of parameters
ganesh@earth.li**20040426112103] {
hunk ./test/regression 4
-::call test12 test13 test14 test15 test16 test17 test18 test19
+::call test12 test13 test14 test15 test16 test17 test18 test19 test20 test21
addfile ./test/test20
hunk ./test/test20 1
-
+# Album HTML - levels and counts
+::run test ! -d scratch
+::run mkdir scratch
+
+::sleep 1
+:{write scratch/photopubrc
+<imagedirs>
+   dir scratch
+   suffix .jpg
+</imagedirs>
+<infofile>
+   dir scratch
+   filename info
+   makealbum all
+</infofile>
+<albumtemplates>
+  standard scratch/album.thtml
+</albumtemplates>
+:}
+
+:{write scratch/info
+group 1-5 foo
+subgroup 2 1-3 bar
+subgroup 2 4-5 blat
+group 6-10 quux
+subgroup 2 6-8 baz
+subgroup 3 6-7 ugh
+subgroup 3 8 splat
+subgroup 2 9-10 whee
+:}
+
+:{write scratch/album.thtml
+<repeat items>
+$counter : $description
+<ifcount=2>2nd</ifcount>
+<ifcount=-2>2nd from last</ifcount>
+<ifcount mod 2=0>Alternate</ifcount>
+<ifupprevlevel>Up from prev</ifupprevlevel>
+<ifdownprevlevel>Down from prev</ifdownprevlevel>
+<ifnextuplevel>Next is up
+</ifnextuplevel>
+<ifnextdownlevel>Next is down
+</ifnextdownlevel>
+</repeat>
+:}
+
+:{init
+:{albumhtml album=/all style=/standard
+1 : foo
+Down from prev
+Next is down
+2 : bar
+2nd
+Alternate
+Down from prev
+3 : blat
+Next is up
+4 : quux
+Alternate
+Up from prev
+Next is down
+5 : baz
+Down from prev
+Next is down
+6 : ugh
+Alternate
+Down from prev
+7 : splat
+2nd from last
+Next is up
+8 : whee
+Alternate
+Up from prev
+Next is up
+Next is up
+:}
+:}
+
+::run rm scratch/*
+::run rmdir scratch
addfile ./test/test21
hunk ./test/test21 1
-
+# album/range HTML - parameters
+::run test ! -d scratch
+::run mkdir scratch
+
+::sleep 1
+:{write scratch/photopubrc
+<imagedirs>
+   dir scratch
+   suffix .jpg
+</imagedirs>
+<infofile>
+   dir scratch
+   filename info
+   makealbum all
+</infofile>
+<albumtemplates>
+  standard scratch/album.thtml
+</albumtemplates>
+<rangetemplates>
+  down scratch/downwards.thtml
+</rangetemplates>
+<embedtemplates>
+   standard scratch/embed.thtml
+</embedtemplates>
+:}
+
+:{write scratch/info
+group 1-5 foo
+group 6-10 bar
+describe 1 splat
+describe 2 ugh
+:}
+
+::makeimage 100x75 scratch/1.jpg
+::makeimage 100x75 scratch/2.jpg
+
+:{write scratch/album.thtml
+<parameter splat default=whee>
+<parameter limit default=none>
+<maxitems $limit>
+<repeat items>
+$splat
+</repeat>
+<ifnext><a next>next</a></ifnext>
+:}
+
+:{write scratch/downwards.thtml
+<parameter splat default=whee>
+<parameter limit default=none>
+<maxitems $limit>
+<repeat picture>
+$splat
+</repeat>
+<ifnext><a next>next</a></ifnext>
+:}
+
+:{write scratch/embed.thtml
+<parameter splat default=whee>
+$splat
+:}
+
+:{init
+:{albumhtml album=/all style=/standard
+whee
+whee
+:}
+
+:{albumhtml album=/all style=/standard splat=blat
+blat
+blat
+:}
+
+:{albumhtml album=/all style=/standard limit=1
+whee
+<a   href="album.pl?album=/all&amp;style=/standard&amp;limit=1&amp;page=2" >next</a>
+:}
+
+:{rangehtml range=/1-5 style=/down
+whee
+whee
+:}
+
+:{rangehtml range=/1-5 style=/down splat=blat
+blat
+blat
+:}
+
+:{rangehtml range=/1-5 style=/down limit=1
+whee
+<a   href="range.pl?range=/1-5&amp;style=/down&amp;limit=1&amp;page=2" >next</a>
+:}
+
+:{embedhtml photo=/1 style=/standard
+whee
+:}
+
+:{embedhtml photo=/1 style=/standard splat=blat
+blat
+:}
+:}
+
+::run rm scratch/*
+::run rmdir scratch
}