Making the images show at admin/itemtype.spl

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Chris Cormack 2008-01-28 13:06:03 -06:00 committed by Joshua Ferraro
parent e59f7d7382
commit 8252e698e9
1 changed files with 3 additions and 2 deletions

View File

@ -102,8 +102,9 @@ if ( $op eq 'add_form' ) {
}
# build list of images
my $imagedir_filesystem = getitemtypeimagedir();
my $imagedir_web = getitemtypeimagesrc();
my $src = "intranet"; # so that the getitemtypeimage functions know where they were called from -fbcit
my $imagedir_filesystem = getitemtypeimagedir($src);
my $imagedir_web = getitemtypeimagesrc($src);
opendir( DIR, $imagedir_filesystem )
or warn "cannot opendir " . $imagedir_filesystem . ": " . $!;
my @imagelist;