version 1.192, 2007/01/02 12:54:40
|
version 1.193, 2007/01/02 19:38:17
|
Line 1410 sub update_metadata_table {
|
Line 1410 sub update_metadata_table {
|
my ($udom,$uname,$remainder) = |
my ($udom,$uname,$remainder) = |
($uri=~m -^/+(?:uploaded|editupload)/+($match_domain)/+($match_name)/+(.*)$-); |
($uri=~m -^/+(?:uploaded|editupload)/+($match_domain)/+($match_name)/+(.*)$-); |
|
|
if ($remainder =~ /groups\/(\w+)\/portfolio(\/.+)$/) { |
if ($remainder =~ /^groups\/(\w+)\/portfolio(\/.+)$/) { |
$group = $1; |
$group = $1; |
$file_name = $2; |
$file_name = $2; |
} elsif ($remainder =~ /portfolio(\/.+)$/) { |
} elsif ($remainder =~ /^portfolio(\/.+)$/) { |
$file_name = $1; |
$file_name = $1; |
} |
} |
$file_name =~ s/\.meta$//; |
$file_name =~ s/\.meta$//; |