Changeset 9169

Timestamp:

2005-02-24T14:13:56+13:00 (19 years ago)

Author:

davidb

Message:

HTMLPlug was always setting URL metadata. This only makes sense if 'file_is_url'
flag is on. Added if statement to check for this.

File:

• trunk/gsdl/perllib/plugins/HTMLPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/HTMLPlug.pm

@@ -233 +233 @@
     unless $self->{'no_metadata'} || $self->{'description_tags'};
 
-    # Store URL for page as metadata - this can be used for an
-    # altavista style search interface. The URL won't be valid
-    # unless the file structure contains the domain name (i.e.
-    # like when w3mir is used to download a website).
-    my $web_url = "http://$file";
-    $doc_obj->add_metadata($cursection, "URL", $web_url);
-    $doc_obj->add_metadata($cursection, "weblink", "<a href=\"$web_url\">");
-    $doc_obj->add_metadata($cursection, "webicon", "_iconworld_");
-    $doc_obj->add_metadata($cursection, "/weblink", "</a>");
+    if ($self->{'file_is_url'}) {
+    # Store URL for page as metadata - this can be used for an
+    # altavista style search interface. The URL won't be valid
+    # unless the file structure contains the domain name (i.e.
+    # like when w3mir is used to download a website).
+    my $web_url = "http://$file";
+    $doc_obj->add_metadata($cursection, "URL", $web_url);
+    $doc_obj->add_metadata($cursection, "weblink", "<a href=\"$web_url\">");
+    $doc_obj->add_metadata($cursection, "webicon", "_iconworld_");
+    $doc_obj->add_metadata($cursection, "/weblink", "</a>");
+    }
 
     if ($self->{'description_tags'}) {