X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=gal2%2FUCW%2FGallery.pm;h=f0a1e97ccb01cd11f69f94793d4cf481ab6d084a;hb=1f16a38e970000b2c73a59a84182b5f90ee5cb61;hp=f13889d2d032f936dde83e04ac89ca51a8a54b1f;hpb=bfa0d113c413c2431f72405623d79cbc7b0b40f2;p=gallery.git diff --git a/gal2/UCW/Gallery.pm b/gal2/UCW/Gallery.pm index f13889d..f0a1e97 100644 --- a/gal2/UCW/Gallery.pm +++ b/gal2/UCW/Gallery.pm @@ -20,9 +20,9 @@ BEGIN { } our %CF; -our $th; BEGIN { + # FIXME: Check config $CF{'Title'} = 'An Unnamed Gallery', $CF{'HeadExtras'} = "", $CF{'TopExtras'} = "", @@ -36,13 +36,15 @@ BEGIN { $CF{'ThumbUrlPrefix'} = "", $CF{'MetaDataDir'} = '.', $CF{'PhotoDir'} = '.', + # FIXME: Who sets GalDir? - $CF{'ScanDefaultTransform'} = 'n'; + $CF{'ScanDefaultTransform'} = 's'; $CF{'OrigDir'} = '.'; $CF{'PhotoDir'} = 'photo'; - $CF{'CacheDir'} = "cache", + $CF{'CacheDir'} = 'cache', $CF{'PhotoMaxWidth'} = 1024, $CF{'PhotoMaxHeight'} = 1024, + $CF{'ThumbFormats'} = {}, } sub LoadConfig() { @@ -64,11 +66,17 @@ sub SetOptions(@) { $CF{$o} = $v; if ($o eq "Theme") { require $CF{"GalDir"} . "/$v/theme.pm"; - Gallery::Theme::Init($CF{"GalURL"} . "/$v"); + UCW::Gallery::Theme::Init($CF{"GalURL"} . "/$v"); } } } +sub RequireThumbnails($$) { + my ($w, $h) = @_; + my $fmt = "${w}x${h}"; + $CF{'ThumbFormats'}->{$fmt} = 1; +} + sub WriteList($$) { my ($file, $images) = @_; open LIST, '>', "$file.new" or die "Cannot create $file.new: $!\n";