[LON-CAPA-cvs] cvs: loncom /interface lonrss.pm

[raeburn]

raeburn		Wed Aug 14 14:39:38 2019 EDT

  Modified files:              
    /loncom/interface	lonrss.pm 
  Log:
  - Whitespace changes only.
  
  
Index: loncom/interface/lonrss.pm
diff -u loncom/interface/lonrss.pm:1.56 loncom/interface/lonrss.pm:1.57
--- loncom/interface/lonrss.pm:1.56	Sun Jan  1 13:50:06 2017
+++ loncom/interface/lonrss.pm	Wed Aug 14 14:39:38 2019
@@ -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 @@
 #	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.'<script type="text/javascript"
-                                src="/res/adm/includes/file_upload.js"></script>';
+        my $head_extra = $rss_link.'<script type="text/javascript" '
+                                   'src="/res/adm/includes/file_upload.js"></script>';
 	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 @@
 							   '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='<tt>'.$newsfeed{$id.'_enclosureurl'}.'</tt>'.