--- loncom/interface/lonrss.pm 2017/01/01 13:50:06 1.56 +++ loncom/interface/lonrss.pm 2019/08/14 14:39:38 1.57 @@ -1,7 +1,7 @@ # The LearningOnline Network # RSS Feeder # -# $Id: lonrss.pm,v 1.56 2017/01/01 13:50:06 raeburn Exp $ +# $Id: lonrss.pm,v 1.57 2019/08/14 14:39:38 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -345,8 +345,8 @@ sub handler { # my $title = $displayfeedname?$displayfeedname:"Available RSS Feeds and Blogs"; my $title = "My Space"; my $rss_link = &Apache::lonrss::rss_link($uname,$udom); - my $head_extra = $rss_link.''; + my $head_extra = $rss_link.''; my $brcrumb = [{href=>$rss_link,text=>"Available RSS Feeds and Blogs"}]; $r->print(&Apache::loncommon::start_page($title,$head_extra, {'bread_crumbs' => $brcrumb, @@ -536,23 +536,23 @@ sub handler { 'title' => 'Title', 'link' => 'Link', 'description' => 'Description', - 'enc' => 'Podcasted enclosure'); - my $uploadlink; - if ($entry==$newid) { + 'enc' => 'Podcasted enclosure'); + my $uploadlink; + if ($entry==$newid) { # Generate upload link only for last (new) entry - # Calculate the quota space available in the user's portfolio - my $disk_quota = &Apache::loncommon::get_user_quota($env{'user.name'}, - $env{'user.domain'}); # expressed in MB - my $portfolio_root = '/userfiles/portfolio'; - my $getpropath = 1; - my $current_disk_usage = &Apache::lonnet::diskusage( - $env{'user.domain'}, $env{'user.name'}, - $portfolio_root, $getpropath); # Expressed in kB - # Convert to MB for use in file_selector() - my $free_space = $disk_quota - ($current_disk_usage / 1024.); - # Format this number since it will be displayed onscreen - $free_space = sprintf("%.1f", $free_space); - $uploadlink=&Apache::inputtags::file_selector(0,0,'*','both','',$free_space); +# Calculate the quota space available in the user's portfolio + my $disk_quota = &Apache::loncommon::get_user_quota($env{'user.name'}, + $env{'user.domain'}); # expressed in MB + my $portfolio_root = '/userfiles/portfolio'; + my $getpropath = 1; + my $current_disk_usage = &Apache::lonnet::diskusage( + $env{'user.domain'}, $env{'user.name'}, + $portfolio_root, $getpropath); # Expressed in kB + # Convert to MB for use in file_selector() + my $free_space = $disk_quota - ($current_disk_usage / 1024.); + # Format this number since it will be displayed onscreen + $free_space = sprintf("%.1f", $free_space); + $uploadlink=&Apache::inputtags::file_selector(0,0,'*','both','',$free_space); } else { # Otherwise, display $uploadlink=''.$newsfeed{$id.'_enclosureurl'}.''.