Unify photo_name

[gallery.git] / gal / bin / gal-gen

diff --git a/gal/bin/gal-gen b/gal/bin/gal-gen
index f190bee132d2bde02af8dc87fec69a7fab5da751..2a1e0caa0b4ada805babf8f345b7bb71a6f922b3 100755 (executable)
--- a/gal/bin/gal-gen
+++ b/gal/bin/gal-gen
@@ -110,7 +110,7 @@ for my $f (@$orig_list) {
                $p->Resize(width=>$w, height=>$h);
        }
 
-       my $photo = File::Spec->catfile($photo_dir, $gal->photo_meta($m, $id));
+       my $photo = $gal->photo_name($m, $id);
        my $tmp = "$photo.new";
        $e = $p->Write($tmp) and die "Unable to write $tmp: $e";
        rename $tmp, $photo or die "Cannot rename $tmp to $photo: $!\n";