X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=gal2%2Fgal-gen;h=3c1a6e98a81752dde349b14ae5816964b4d52310;hb=1f16a38e970000b2c73a59a84182b5f90ee5cb61;hp=7d244fe65edad26a85e6d9d86c8c87092f1bd067;hpb=11e566792f70153b513d4916f0540addcb0147ae;p=gallery.git

diff --git a/gal2/gal-gen b/gal2/gal-gen
index 7d244fe..3c1a6e9 100755
--- a/gal2/gal-gen
+++ b/gal2/gal-gen
@@ -41,7 +41,6 @@ for my $f (@$orig_list) {
 	my $id = $f->{id};
 	my $rotate = $f->{orientation};
 	my $xfrm = $f->{xfrm};
-	push @{$meta->{sequence}}, $id;
 	print "$id: ";
 
 	my $p = new Image::Magick;
@@ -69,7 +68,10 @@ for my $f (@$orig_list) {
 		'xf' => $xfrm,
 		'w' => $w,
 		'h' => $h,
+		'title' => $f->{title},
 	};
+	$meta->{photo}->{$id} = $m;
+	push @{$meta->{sequence}}, $id;
 
 	my $om = $old_meta->{photo}->{$id};
 	if ($om &&
@@ -79,7 +81,6 @@ for my $f (@$orig_list) {
 	    $om->{h} eq $m->{h}) {
 		# FIXME: Remove old images?
 		print "... uptodate\n";
-		$meta->{photo}->{$id} = $om;
 		next;
 	}
 
@@ -121,7 +122,6 @@ for my $f (@$orig_list) {
 	rename $tmp, $photo or die "Cannot rename $tmp to $photo: $!\n";
 
 	print "... OK\n";
-	$meta->{photo}->{$id} = $m;
 }
 
 print "Writing meta-data\n";