# Album HTML - links
::run test ! -d scratch
::run mkdir scratch
::run mkdir scratch/{1,2,3,4}

::sleep 1
:{write scratch/photopubrc
<path test1>
   <imagedirs>
      dir scratch/1
      suffix .jpg
   </imagedirs>
   <infofile>
      dir scratch/1
      filename info
      makealbum all
   </infofile>
</path>
<path test2>
   <imagedirs>
      dir scratch/2
      suffix .jpg
   </imagedirs>
   <infofile>
      dir scratch/2
      filename info
      makealbum all
   </infofile>
</path>
<path test3>
   <imagedirs>
      dir scratch/3
      suffix .jpg
   </imagedirs>
   <infofile>
      dir scratch/3
      filename info
      makealbum all
   </infofile>
</path>
<path test4>
   <imagedirs>
      dir scratch/4
      suffix .jpg
   </imagedirs>
   <infofile>
      dir scratch/4
      filename info
      makealbum all
   </infofile>
</path>
<album all>
   <link test1/all>
      title "Foo"
   </link>
   include test3/all
   <link test2/all>
      title "Bar"
   </link>
   include test4/all
</album>
<albumtemplates>
  standard scratch/album.thtml
</albumtemplates>
:}


:{write scratch/1/info
group 1-5 foo
:}
:{write scratch/2/info
group 1-5 bar
:}
:{write scratch/3/info
group 1-5 baz
:}
:{write scratch/4/info
group 1-5 quux
:}

:{write scratch/album.thtml
<repeat items>
<ifgroup>
<a group>$description</a>
</ifgroup>
<iflink>
<a link>$title</a>
</iflink>
</repeat>
:}

:{init
:{albumhtml album=/all style=/standard
<a href="album.pl?album=/test1/all&amp;style=/standard">Foo</a>
<a href="range.pl?range=/test3/1-5">baz</a>
<a href="album.pl?album=/test2/all&amp;style=/standard">Bar</a>
<a href="range.pl?range=/test4/1-5">quux</a>
:}
:}

::sleep 1
:{write scratch/album.thtml
<repeat items order=reverse>
<ifgroup>
<a group>$description</a>
</ifgroup>
<iflink>
<a link>$title</a>
</iflink>
</repeat>
:}

:{init
:{albumhtml album=/all style=/standard
<a href="range.pl?range=/test4/1-5">quux</a>
<a href="album.pl?album=/test2/all&amp;style=/standard">Bar</a>
<a href="range.pl?range=/test3/1-5">baz</a>
<a href="album.pl?album=/test1/all&amp;style=/standard">Foo</a>
:}
:}

::sleep 1
:{write scratch/album.thtml
<repeat items order=reversegroups>
<ifgroup>
<a group>$description</a>
</ifgroup>
<iflink>
<a link>$title</a>
</iflink>
</repeat>
:}

:{init
:{albumhtml album=/all style=/standard
<a href="album.pl?album=/test1/all&amp;style=/standard">Foo</a>
<a href="album.pl?album=/test2/all&amp;style=/standard">Bar</a>
<a href="range.pl?range=/test4/1-5">quux</a>
<a href="range.pl?range=/test3/1-5">baz</a>
:}
:}

::sleep 1
:{write scratch/album.thtml
<repeat items>
<ifgroup>
<a group>$description</a>
</ifgroup>
<iflink>
<a link nostyle>$title</a>
</iflink>
</repeat>
:}

:{init
:{albumhtml album=/all style=/standard
<a href="album.pl?album=/test1/all">Foo</a>
<a href="range.pl?range=/test3/1-5">baz</a>
<a href="album.pl?album=/test2/all">Bar</a>
<a href="range.pl?range=/test4/1-5">quux</a>
:}
:}

::run rm scratch/{1,2,3,4}/*
::run rmdir scratch/{1,2,3,4}
::run rm scratch/*
::run rmdir scratch