[Openinteract-commits] CVS: OpenInteract/pkg/base_page/OpenInteract/Handler Page.pm,1.11,1.12

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract/pkg/base_page/OpenInteract/Handler
In directory usw-pr-cvs1:/tmp/cvs-serv15191/OpenInteract/Handler

Modified Files:
	Page.pm 
Log Message:
get/set the 'size' attribute of the page metadata object (generally
only needed if we're uploading and working with non-HTML files )


Index: Page.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract/pkg/base_page/OpenInteract/Handler/Page.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** Page.pm	2001/11/26 06:26:42	1.11
--- Page.pm	2001/11/26 13:44:31	1.12
***************
*** 142,145 ****
--- 142,146 ----
                                     "Filename: (", $upload->filename, ") Size: (",
                                     $upload->size, ") Type: (", $upload->type, ")" );
+         $page->{size}      = $upload->size;
          $page->{mime_type} = $upload->type;
          if ( $class->_is_displayable( $page->{mime_type} ) ) {
***************
*** 237,242 ****
  
      unless ( $class->_is_displayable( $page->{mime_type} ) ) {
!         $R->{page}{content_type} = $page->{mime_type};
!         $R->{page}{send_file}    = join( '', $R->CONFIG->get_dir( 'html' ), $page->{location} );
          $R->DEBUG && $R->scrib( 1, "File being retrieved is not directly displayable.",
                                     "Set 'send_file' to ($page->{location})" );
--- 238,244 ----
  
      unless ( $class->_is_displayable( $page->{mime_type} ) ) {
!         $R->{page}{content_type}   = $page->{mime_type};
!         $R->{page}{send_file}      = join( '', $R->CONFIG->get_dir( 'html' ), $page->{location} );
!         $R->{page}{send_file_size} = $page->{size};
          $R->DEBUG && $R->scrib( 1, "File being retrieved is not directly displayable.",
                                     "Set 'send_file' to ($page->{location})" );