Changeset 3148 for trunk/gsdl/perllib/plugins/HTMLPlug.pm
- Timestamp:
- 2002-06-17T10:28:16+12:00 (22 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/HTMLPlug.pm
r3135 r3148 149 149 $file =~ s@(\\)+@/@g; 150 150 } 151 152 # reset per-doc stuff... 153 $self->{'aux_files'} = {}; 154 $self->{'dir_num'} = 0; 155 $self->{'file_num'} = 0; 156 151 157 my $cursection = $doc_obj->get_top_section(); 152 158 … … 372 378 } 373 379 $doc_obj->associate_file($filename, $newname, undef, $section); 374 return "_http collimg_/$newname";380 return "_httpdocimg_/$newname"; 375 381 376 382 } else {
Note:
See TracChangeset
for help on using the changeset viewer.