Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Friday, October 16, 2026
[BACK] [TXT][DIR] Up to [Platon] / web-apps / fastcgi-gallery / _modules

Diff for web-apps/fastcgi-gallery/_modules/gallery.pm between version 1.1 and 1.2

version 1.1, 2005/09/07 13:36:47 version 1.2, 2005/09/08 23:08:14
Line 10 
Line 10 
 # 2005-07-19 - created  # 2005-07-19 - created
 #  #
   
 # $Platon$  # $Platon: web-apps/fastcgi-gallery/_modules/gallery.pm,v 1.1 2005/09/07 13:36:47 rajo Exp $
   
 package gallery;  package gallery;
   
Line 162  sub handler { # {{{
Line 162  sub handler { # {{{
                 $tpl_vars{menu} = $self->generate_menu();                  $tpl_vars{menu} = $self->generate_menu();
   
                 # Read, sort, and filter files                  # Read, sort, and filter files
                 my @files = grep { !/^\./ && -f "$abs_filename/$_" } readdir (DIR);                  my @files = grep { !/^\./ && !/^CVS$/ && -f "$abs_filename/$_" } readdir (DIR);
   
                 @files = gallerysort($self, $abs_filename, @files);                  @files = gallerysort($self, $abs_filename, @files);
   
Line 182  sub handler { # {{{
Line 182  sub handler { # {{{
   
                 # Read and sort directories                  # Read and sort directories
                 rewinddir (DIR);                  rewinddir (DIR);
                 my @directories = grep { !/^\./ && -d "$abs_filename/$_" && -r "$abs_filename/$_" } readdir (DIR);                  my @directories = grep { !/^\./ && !/^CVS$/ && -d "$abs_filename/$_" && -r "$abs_filename/$_" } readdir (DIR);
                 my $dirsortby = $self->config('GalleryDirSortBy') || $self->config('GallerySortBy') || '';                  my $dirsortby = $self->config('GalleryDirSortBy') || $self->config('GallerySortBy') || '';
   
                 if ($dirsortby && $dirsortby =~ m/^(size|atime|mtime|ctime)$/) {                  if ($dirsortby && $dirsortby =~ m/^(size|atime|mtime|ctime)$/) {
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS 		Go to Top