[bug fix for linkroot
ganesh@earth.li**20040430040719] {
hunk ./PhotoPub/Utils.pm 348
-  my $root=&handlephoto('default',"/$thing");
+  my $root=&handlephoto('linkroot',"/$thing");
hunk ./test/regression 5
-::call test22
+::call test22 test23
addfile ./test/test23
hunk ./test/test23 1
-
+# linkroots
+::run test ! -d scratch
+::run mkdir scratch
+
+::sleep 1
+:{write scratch/photopubrc
+albumlinkroot album
+<albumtemplates>
+  standard scratch/album.thtml
+</albumtemplates>
+<album all>
+  <link test1/all>
+    title Test1
+  </link>
+</album>
+:}
+
+:{write scratch/album.thtml
+<repeat items>
+<iflink>
+<a link>$title</a>
+</iflink>
+</repeat>
+:}
+
+:{init
+:{albumhtml album=/all style=/standard
+<a href="album?album=/test1/all&amp;style=/standard">Test1</a>
+:}
+:}
+
+::run rm scratch/*
+::run rmdir scratch
}