Changeset 9228
- Timestamp:
- 2005-03-01T15:21:11+13:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/HTMLPlug.pm
r9169 r9228 233 233 unless $self->{'no_metadata'} || $self->{'description_tags'}; 234 234 235 # Store URL for page as metadata - this can be used for an 236 # altavista style search interface. The URL won't be valid 237 # unless the file structure contains the domain name (i.e. 238 # like when w3mir is used to download a website). 239 240 # URL metadata (even invalid ones) are used to support internal 241 # links, so even if 'file_is_url' is off, still need to store info 242 243 my $web_url = "http://$file"; 244 $doc_obj->add_metadata($cursection, "URL", $web_url); 245 235 246 if ($self->{'file_is_url'}) { 236 # Store URL for page as metadata - this can be used for an237 # altavista style search interface. The URL won't be valid238 # unless the file structure contains the domain name (i.e.239 # like when w3mir is used to download a website).240 my $web_url = "http://$file";241 $doc_obj->add_metadata($cursection, "URL", $web_url);242 247 $doc_obj->add_metadata($cursection, "weblink", "<a href=\"$web_url\">"); 243 248 $doc_obj->add_metadata($cursection, "webicon", "_iconworld_");
Note:
See TracChangeset
for help on using the changeset viewer.