view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	  will not allow scaling to 641x480 if you only configured
	  640x480. (To prevent evil people filling up your disk) (Me)
	- Handle spaces in files and directories correct. 
	- Now possible to rotate pictures on the fly. (Thomas Eibner)
	- Copyright picture can be included on each picture (Thomas Eibner)
	- Comments for each picture changed to be in 
	  picture.jpg.comments (Thomas Eibner)
  - Scale thumbnails correct when images are rotated 90-degrees. (Me)

0.2 Sun Oct 14 19:57:06 2001
	- addcomments.pl renamed to gallery-editcomments.pl
	- Added "viewing picture X of Y" when viewing images
	- Switched to using Imlib2 instead of GD. Apache::Gallery
	  now supports all the image formats Imlib2 supports.
	- Added gallery-buildcache.pl script to generated thumbnails
	  (Usefull if your browser times out the first time you
		visit a new gallery)

0.1.1 Sat Sep 30 01:10:03 2001
	- Added src/addcomments.pl script for editing picture
	  comments.

lib/Apache/Gallery.pm  view on Meta::CPAN

	# Get the full path of the base directory
	my $dirname;
	{
		my @direlem = split (/\//, $filename);
		for my $i ( 0 .. ( scalar(@direlem) - scalar(@links) ) ) {
			$dirname .= shift(@direlem) . '/';
		}
		chop $dirname;
	}

	my $picturename;
	if (-f $filename) {
		$picturename = pop(@links);	
	}

	if ($r->uri eq $root_path) {
		return qq{ <a href="$root_path">$root_text</a> };
	}

	my $menu;
	my $menuurl = $root_path;
	foreach my $link (@links) {

lib/Apache/Gallery.pm  view on Meta::CPAN

		if ("$root_path$uri" eq $menuurl) {
			$menu .= "$linktext  / ";
		}
		else {
			$menu .= "<a href=\"".uri_escape($menuurl, $escape_rule)."\">$linktext</a> / ";
		}

	}

	if (-f $filename) {
		$menu .= $picturename;
	}
	else {

		if ($r->dir_config('GallerySelectionMode') && $r->dir_config('GallerySelectionMode') eq '1') {
			$menu .= "<a href=\"".uri_escape($menuurl, $escape_rule);
			$menu .= "?select=1\">[select]</a> ";
		}
	}

	return $menu;