miscellaneous stuff i've forgotten to check in

This commit is contained in:
JT Smith 2006-02-26 19:02:10 +00:00
parent 4e9eb32635
commit eea0cc0569
5 changed files with 588 additions and 13 deletions

View file

@ -1415,19 +1415,7 @@ sub newByUrl {
$url =~ s/\"//;
my $asset;
if ($url ne "") {
my ($id, $class) = $session->db->quickArray("
select
asset.assetId,
asset.className
from
asset
left join
assetData on asset.assetId=assetData.assetId
where
assetData.url=".$session->db->quote($url)."
group by
assetData.assetId
");
my ($id, $class) = $session->db->quickArray("select distinct asset.assetId, asset.className from assetData join asset using (assetId) where assetData.url = ?", [ $url ]);
if ($id ne "" || $class ne "") {
return WebGUI::Asset->new($session,$id, $class, $revisionDate);
} else {