Moved extras, uploadsURL, and uploadsPath settings to config file.
This commit is contained in:
parent
b81aa7f9aa
commit
29d2b0e63c
19 changed files with 86 additions and 99 deletions
|
|
@ -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))) {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue