View | Details | Raw Unified | Return to bug 7321
Collapse All | Expand All

(-)a/C4/Koha.pm (-3 / +1 lines)
Lines 573-581 sub getImageSets { Link Here
573
573
574
    my @imagesets = (); # list of hasrefs of image set data to pass to template
574
    my @imagesets = (); # list of hasrefs of image set data to pass to template
575
    my @subdirectories = _getSubdirectoryNames( $paths->{'staff'}{'filesystem'} );
575
    my @subdirectories = _getSubdirectoryNames( $paths->{'staff'}{'filesystem'} );
576
warn $paths->{'staff'}{'filesystem'};
577
    foreach my $imagesubdir ( @subdirectories ) {
576
    foreach my $imagesubdir ( @subdirectories ) {
578
	warn $imagesubdir;
577
    warn $imagesubdir if $DEBUG;
579
        my @imagelist     = (); # hashrefs of image info
578
        my @imagelist     = (); # hashrefs of image info
580
        my @imagenames = _getImagesFromDirectory( File::Spec->catfile( $paths->{'staff'}{'filesystem'}, $imagesubdir ) );
579
        my @imagenames = _getImagesFromDirectory( File::Spec->catfile( $paths->{'staff'}{'filesystem'}, $imagesubdir ) );
581
        my $imagesetactive = 0;
580
        my $imagesetactive = 0;
582
- 

Return to bug 7321