--- Compiled.pm.~BASE~  2012-06-27 16:25:15.000000000 +1000
+++ Compiled.pm         2012-06-27 16:25:27.000000000 +1000
@@ -517,7 +517,7 @@
 
        if( !defined $doc->[0] || ref($doc->[0]) ne "EPrints::DataObj::Document" )
        {
-               $self->runtime_error( "Can only call document_size() on document objects not ".
+               $self->runtime_error( "Can only call doc_size() on document objects not ".
                        ref($doc->[0]) );
        }
 
@@ -528,7 +528,7 @@
 
        my %files = $doc->[0]->files;
 
-       return $files{$doc->[0]->get_main} || 0;
+       return [ $files{$doc->[0]->get_main} || 0, "INTEGER" ];
 }
 
 sub run_is_public
@@ -537,7 +537,7 @@
 
        if( !defined $doc->[0] || ref($doc->[0]) ne "EPrints::DataObj::Document" )
        {
-               $self->runtime_error( "Can only call document_size() on document objects not ".
+               $self->runtime_error( "Can only call is_public() on document objects not ".
                        ref($doc->[0]) );
        }
 
@@ -601,7 +601,7 @@
 {
        my( $self, $state, $size_in_bytes ) = @_;
 
-       return [ EPrints::Utils::human_filesize( $size_in_bytes || 0 ), "INTEGER" ];
+       return [ EPrints::Utils::human_filesize( $size_in_bytes->[0] || 0 ), "INTEGER" ];
 }
 
 sub run_control_url