Moved extras, uploadsURL, and uploadsPath settings to config file.

This commit is contained in:
JT Smith 2002-07-12 00:25:02 +00:00
parent b81aa7f9aa
commit 29d2b0e63c
19 changed files with 86 additions and 99 deletions

View file

@ -115,7 +115,7 @@ sub _resizeImage {
sub box {
my ($output);
$output = '<p><table cellpadding=3 cellspacing=0 border=1><tr><td class="tableHeader">'.
'<a href="'.$_[0]->getURL.'"><img src="'.$session{setting}{lib}.
'<a href="'.$_[0]->getURL.'"><img src="'.$session{config}{extras}.
'/attachment.gif" border=0 alt="'.
$_[0]->getFilename.'"></a></td><td><a href="'.$_[0]->getURL.
'"><img src="'.$_[0]->getIcon.
@ -223,7 +223,7 @@ sub getFilename {
sub getIcon {
my ($extension, $icon);
$extension = $_[0]->getType;
$icon = $session{setting}{lib}."/fileIcons/";
$icon = $session{config}{extras}."/fileIcons/";
if (isIn($extension, qw(doc dot wri))) {
$icon .= "doc.gif";
} elsif (isIn($extension, qw(txt log sql config conf pm cnf readme))) {