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

[raeburn]

raeburn		Mon Aug 25 01:42:30 2014 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  - Remove unused scalar.
  - Remove trailing whitespace.
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.583 loncom/interface/londocs.pm:1.584
--- loncom/interface/londocs.pm:1.583	Mon Aug 25 00:55:27 2014
+++ loncom/interface/londocs.pm	Mon Aug 25 01:42:30 2014
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.583 2014/08/25 00:55:27 raeburn Exp $
+# $Id: londocs.pm,v 1.584 2014/08/25 01:42:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5467,7 +5467,6 @@
     unshift(@hiddens,$pathitem);
     foreach my $item (@hiddens) {
         if ($env{'form.'.$item}) {
-            my $value = $env{'form.'.$item};
             $hiddenelem .= '<input type="hidden" name="'.$item.'" value="'.
                            &HTML::Entities::encode($env{'form.'.$item},'<>&"').'" />'."\n";
         }
@@ -5536,7 +5535,7 @@
                 $archiveidx = $position-1;
             }
             $env{'form.cmd'} = 'remove_'.$archiveidx;
-            my ($title,$url, at rrest) = 
+            my ($title,$url, at rrest) =
                 split(/:/,$LONCAPA::map::resources[$LONCAPA::map::order[$archiveidx]]);
             if ($url eq $env{'form.archiveurl'}) {
                 if (&handle_edit_cmd($docuname,$docudom)) {