From: Rob H. <for...@us...> - 2001-12-20 23:38:03
|
Update of /cvsroot/sandweb/sandweb/bin In directory usw-pr-cvs1:/tmp/cvs-serv5039/bin Modified Files: sandweb.cgi Log Message: non-text files now give the download option when you click on them. it essentially pulls up the view_file template with no content. Index: sandweb.cgi =================================================================== RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v retrieving revision 1.102 retrieving revision 1.103 diff -U2 -r1.102 -r1.103 --- sandweb.cgi 2001/12/20 23:11:38 1.102 +++ sandweb.cgi 2001/12/20 23:31:31 1.103 @@ -488,14 +488,13 @@ elsif ( $file_command eq 'view' ) { $log->debug("viewing file : $filename"); + + my @tmp = $file->file_read(); + if ( $file->get_file_type() ne "Text" ) { $log->debug("User wants to view non-text file : $filename"); set_error("This does not appear to be a text file."); - browse_menu( - cookie => $cookie, - path => $location, - ); + @tmp = (); } - my @tmp = $file->file_read(); my $content = $ui->get_menu( |