Changeset 13222
- Timestamp:
- 2006-11-03T15:33:51+13:00 (17 years ago)
- Location:
- trunk/gsdl/perllib/plugins
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/METSPlug.pm
r12169 r13222 234 234 } 235 235 236 sub get_doctype { 237 my $self = shift(@_); 238 239 return "mets:mets"; 240 } 241 236 242 sub xml_end_tag { 237 243 my $self = shift(@_); -
trunk/gsdl/perllib/plugins/OAIPlug.pm
r12169 r13222 73 73 74 74 return q^(?i)(\.oai)$^; 75 } 76 77 sub get_doctype { 78 my $self = shift(@_); 79 80 return "OAI-PMH"; 75 81 } 76 82 -
trunk/gsdl/perllib/plugins/OpenDocumentPlug.pm
r12169 r13222 74 74 } 75 75 76 sub get_doctype { 77 my $self = shift(@_); 78 79 return "manifest:manifest"; 80 } 76 81 77 82 sub xml_doctype { -
trunk/gsdl/perllib/plugins/PagedImgPlug.pm
r12683 r13222 244 244 return q^\.item$^; 245 245 } 246 247 sub get_doctype { 248 my $self = shift(@_); 249 250 return "PagedDocument"; 251 } 252 246 253 247 254 # want to block everything except the .item ones
Note:
See TracChangeset
for help on using the changeset viewer.