From c755ba2cea3880eba6c150091986cde6960f9b38 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Thu, 27 Sep 2012 16:34:03 +0200
Subject: [PATCH] Fix bugs caused by recent changes

---
 gal/Gallery/Generator.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gal/Gallery/Generator.pm b/gal/Gallery/Generator.pm
index b3542a1..c435543 100644
--- a/gal/Gallery/Generator.pm
+++ b/gal/Gallery/Generator.pm
@@ -32,7 +32,7 @@ sub img($$$) {
 	print "$base: ";
 	my $p = new Image::Magick;
 	my $e;
-	my $img = $CF{"PhotoDir"} . $orig;
+	my $img = $CF{"PhotoDir"} . "/$orig";
 	$e = $p->Read($img) and die "Error reading $img: $e";
 	my ($wo, $ho) = $p->Get('width', 'height');
 	my ($w, $h) = ($wo, $ho);
@@ -52,7 +52,7 @@ sub img($$$) {
 	$h = int($h);
 	print " -> ${w}x${h} ";
 	$p->Resize(width=>$w, height=>$h);
-	my $thumb = $CF{"ThumbDir"} . "$base-thumb.jpg";
+	my $thumb = $CF{"ThumbDir"} . "/$base-thumb.jpg";
 	$e = $p->Write($thumb) and die "Unable to write $thumb: $e";
 	print NOTES "$base $w $h $wo $ho\n";
 	print "OK\n";
-- 
2.39.2