Changeset 20831 for gsdl/trunk

Timestamp:

2009-10-21T16:11:13+13:00 (15 years ago)

Author:

kjdon

Message:

added can_process_this_file sub - want to base test on filename, not on XML doctype as our file is a zip file

File:

• gsdl/trunk/perllib/plugins/OpenDocumentPlugin.pm (modified) (3 diffs)

gsdl/trunk/perllib/plugins/OpenDocumentPlugin.pm

@@ -83 +83 @@
     
     return bless $self, $class;
+}
+
+# want to use BasePlugin's version of this, not ReadXMLFile's
+sub can_process_this_file {
+    my $self = shift(@_);
+    
+    return $self->BasePlugin::can_process_this_file(@_);
 }
 
@@ -176 +183 @@
     $self->{'file'} = $file;
     $self->{'filename'} = $filename_full_path;
+    $self->{'filename_no_path'} = $filename_no_path;
     $self->{'processor'} = $processor;
     $self->{'metadata'} = $metadata;
@@ -240 +248 @@
     my $self = shift(@_);
     my ($filename,$file_only) = @_;
-  
+    
     my $doc_obj = $self->{'doc_obj'};  
-
     my $mimetype = $self->get_mimetype();
 
     $file_only = $doc_obj->get_assocfile_from_sourcefile(); # url-encoded filename in archives
-    
     $doc_obj->associate_file($filename, $file_only, $mimetype, "");
     $doc_obj->associate_file("Thumbnails/thumbnail.png", "thumbnail.png", "image/png", "");