]> mj.ucw.cz Git - gallery.git/blobdiff - gal2/UCW/Gallery.pm
Gallery2: Removed auto-generated comment at the top of gallery.list
[gallery.git] / gal2 / UCW / Gallery.pm
index f97ddd8bc4332e9bb3fafc1848471291c417a1cd..c8bdc68a5fd52f45e46ae682889fc552714084cf 100644 (file)
@@ -83,7 +83,6 @@ sub RequireThumbnails($$) {
 sub WriteList($$) {
        my ($file, $images) = @_;
        open LIST, '>', "$file.new" or die "Cannot create $file.new: $!\n";
 sub WriteList($$) {
        my ($file, $images) = @_;
        open LIST, '>', "$file.new" or die "Cannot create $file.new: $!\n";
-       print LIST "# Image\tID\tRotate\tXform\tTitle\n";
        for my $i (@$images) {
                print LIST join("\t",
                        $i->{file},
        for my $i (@$images) {
                print LIST join("\t",
                        $i->{file},