Commit 2aa50328 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor fixes, also deal with // vs : thing in image URNs. Yuck.

parent cc6214fc
......@@ -575,8 +575,7 @@ sub GetImageInfo($)
if ($hrn->type() ne "image");
# The id might be version specific.
my ($pid,$imagename,$version) = split("\/\/", $hrn->id());
print STDERR Dumper($hrn);
my (undef,$pid,$imagename,$version) = $hrn->ParseImage();
if (defined($version)) {
if ($version !~ /^\d+$/) {
......@@ -584,7 +583,10 @@ sub GetImageInfo($)
}
# Kill the version number from the url.
$urn =~ s/:\d+$//;
$urn =~ s/\/\/\d+$//;
}
# This // vs : thing is a pain.
$urn =~ s/\/\//:/;
my $safe_urn = DBQuoteSpecial($urn);
$query_result =
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment