[LON-CAPA-cvs] cvs: loncom /publisher lonpublisher.pm

[albertel]

albertel		Thu Feb 14 17:01:39 2002 EDT

  Modified files:              
    /loncom/publisher	lonpublisher.pm 
  Log:
  - stops saying "Currently Not Available" on blank allows (maps often have blanks resources.)
  - now sorts depdencies, looks prettier
  
  
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.72 loncom/publisher/lonpublisher.pm:1.73
--- loncom/publisher/lonpublisher.pm:1.72	Fri Jan 18 11:48:14 2002
+++ loncom/publisher/lonpublisher.pm	Thu Feb 14 17:01:39 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.72 2002/01/18 16:48:14 albertel Exp $
+# $Id: lonpublisher.pm,v 1.73 2002/02/14 22:01:39 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -392,8 +392,9 @@
     
 	$scrout.='<h3>Dependencies</h3>';
         my $allowstr='';
-        foreach (keys %allow) {
+        foreach (sort(keys(%allow))) {
 	   my $thisdep=$_;
+	   if ($thisdep !~ /[^\s]/) { next; }
            unless ($style eq 'rat') { 
               $allowstr.="\n".'<allow src="'.$thisdep.'" />';
 	   }
@@ -592,7 +593,7 @@
                       $keywordout.=' checked'; 
                    }
 	        } elsif (&Apache::loncommon::keyword($_)) {
-		    $keywordout.=' checked';
+	            $keywordout.=' checked';
                 } 
                 $keywordout.='>'.$_.'</td>';
                 if ($colcount>10) {