[Aimmath-commit] AIM/WEB-INF/maple/aim/admin Zone.mpl,1.2.2.2,1.2.2.3

[<gus...@us...>]

Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv5490/WEB-INF/maple/aim/admin

Modified Files:
      Tag: develop_2_1
	Zone.mpl 
Log Message:
temporary fix for bug that hits when no subjects exist. Neil could fix this more nicely when he is back.

Index: Zone.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/admin/Zone.mpl,v
retrieving revision 1.2.2.2
retrieving revision 1.2.2.3
diff -C2 -d -r1.2.2.2 -r1.2.2.3
*** Zone.mpl	11 Jul 2003 14:17:29 -0000	1.2.2.2
--- Zone.mpl	13 Jul 2003 14:54:05 -0000	1.2.2.3
***************
*** 335,343 ****
     hiddensubjects := sort([op(hiddensubjects)]);
  
!    if visiblesubjects = [] and
!       hiddensubjects = [] then
!     subjecttable := 
!      __("There are no visible or hidden subjects for this zone.");
!    else
      subjecttable :=
       `new/HTML/Tag`(
--- 335,343 ----
     hiddensubjects := sort([op(hiddensubjects)]);
  
! #   if visiblesubjects = [] and
! #      hiddensubjects = [] then
! #    subjecttable := 
! #     __("There are no visible or hidden subjects for this zone.");
! #   else
      subjecttable :=
       `new/HTML/Tag`(
***************
*** 418,422 ****
       fi;
      fi;
!    fi; 
  
     page['Title'] := __("Zone:");
--- 418,422 ----
       fi;
      fi;
! #   fi; 
  
     page['Title'] := __("Zone:");