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

[raeburn]

raeburn		Fri Jan  4 00:11:59 2013 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  - Eliminate duplicate declarations.
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.526 loncom/interface/londocs.pm:1.527
--- loncom/interface/londocs.pm:1.526	Thu Jan  3 23:47:51 2013
+++ loncom/interface/londocs.pm	Fri Jan  4 00:11:59 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.526 2013/01/03 23:47:51 raeburn Exp $
+# $Id: londocs.pm,v 1.527 2013/01/04 00:11:59 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -651,7 +651,7 @@
         $is_external = 1;
     }
 
-    my ($canpaste,$nopaste,$othercrs,$areachange,$is_uploaded_map);
+    my ($canpaste,$nopaste,$othercrs,$areachange);
     if ($folder =~ /^supplemental/) {
         $canpaste = &supp_pasteable($env{'docs.markedcopy_url'});
         unless ($canpaste) {
@@ -1543,7 +1543,7 @@
             if ($folder !~ /^supplemental/) {
                 $report = 1;
             }
-            my ($outtext,$errtext) =
+            (my $outtext,$errtext) =
                 &LONCAPA::map::storemap("/uploaded/$cdom/$cnum/$storefn",1,$report);
             if ($errtext) {
                 return &mt('Paste failed: an error occurred saving the folder or page.');