[more album tests
ganesh@earth.li**20040421221935] hunk ./test/test13 63
+:{init
+:{albumhtml album=/all style=/standard search=bar
+<a href="range.pl?range=/6-10&amp;style=/across">bar</a>
+:}
+:}
+
+::sleep 1
+:{write scratch/album.thtml
+<iftitle>$albumtitle</iftitle>
+<ifnotitle>Album $album</ifnotitle>
+:}
+
+
+
+:{init
+:{albumhtml album=/all style=/standard
+Album /all
+:}
+:}
+
+
+::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>
+<album all>
+  title The whole lot
+  style /standard
+</album>
+:}
+
+:{init
+:{albumhtml album=/all
+The whole lot
+:}
+:}
+
+:{write scratch/album.thtml
+<repeat items order=reverse>
+<ifgroup>
+<a group style="/across">$description</a>
+</ifgroup>
+</repeat>
+:}
+
+:{init
+:{albumhtml album=/all
+<a href="range.pl?range=/6-10&amp;style=/across">bar</a>
+<a href="range.pl?range=/1-5&amp;style=/across">foo</a>
+:}
+:}
+
+# Errors
+
+::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>
+:}
+
+:{init
+:{albumhtml album=/none style=/standard
+:!userinput That album (/none) contains no entries - perhaps you specified an incorrect album?
+:}
+:}
+
+::sleep 1
+::run rm scratch/album.thtml
+
+:{init
+:{albumhtml album=/all style=/foo
+:!userinput Album style /foo not defined
+:}
+:}
+
+:{init
+:{albumhtml album=/all style=/standard
+:!config Couldn't stat $basedir/scratch/album.thtml
+:}
+:}
+
+:{init
+:{albumhtml album=/all
+:!userinput style not given and no default defined
+:}
+:}
+
+
+
+:{init
+:{albumhtml style=/standard
+:!userinput album not given and no default defined
+:}
+:}
+
+