X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/deb4d2dbb676d7d6f69dfe7815d6e0cb09bd4a44..53593baa211863fbf66540cf1bcc36c8fb37257f:/SL/Webdav/Object.pm?ds=sidebyside

diff --git a/SL/Webdav/Object.pm b/SL/Webdav/Object.pm
index 4ecf423b5..e4ece7969 100644
--- a/SL/Webdav/Object.pm
+++ b/SL/Webdav/Object.pm
@@ -42,6 +42,10 @@ sub full_filedescriptor {
   File::Spec->catfile($self->webdav->webdav_path, $self->filename);
 }
 
+sub size {
+  ($_[0]->stat)[7];
+}
+
 sub atime {
   DateTime->from_epoch(epoch => ($_[0]->stat)[8]);
 }
@@ -132,6 +136,10 @@ Returns the version string.
 
 Returns the extension.
 
+=item C<size>
+
+wrapped stat[7]
+
 =item C<atime>
 
 L<DateTime> wrapped stat[8]
@@ -148,6 +156,10 @@ Ref to the actual data in raw encoding.
 
 URL relative to the web base dir for download.
 
+=item C<full_filedescriptor>
+
+Fully qualified path to file.
+
 =back
 
 =head1 SEE ALSO