Subversion Repositories wimsdev

Rev

Rev 11646 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11646 Rev 11888
Line 60... Line 60...
60 
!set Listlevel=$wims_listlevel
 60 
!set Listlevel=$wims_listlevel
61 
!set search_levelcnt=!itemcnt $Listlevel
 61 
!set search_levelcnt=!itemcnt $Listlevel
62 
!set listlevel=!makelist level x for x in $Listlevel
 62 
!set listlevel=!makelist level x for x in $Listlevel
63 
!set listlevel=!nospace $listlevel
 63 
!set listlevel=!nospace $listlevel
64 
!set listlevel=!lowercase $listlevel
 64 
!set listlevel=!lowercase $listlevel
- 
 
 65 
!if $search_level=all
- 
 
 66 
  search_level=$(listlevel)
65 
 
 67 
!endif
66 
!if $wims_user=supervisor
 68 
!if $wims_user=supervisor and $search_level=$empty
67 
 !set cl=!positionof item $class_level in $Listlevel
 69 
 !set cl=!positionof item $class_level in $Listlevel
68 
 !default search_level_from=$[max(1,$cl-1)]
 70 
 !default search_level_from=$[max(1,$cl-1)]
69 
 !default search_level_to=$[$cl+1]
 71 
 !default search_level_to=$[$cl+1]
70 
!endif
 72 
!endif
71 
!if $search_level_from=1 and $search_level_to=$search_levelcnt
 73 
!if $search_level_from=1 and $search_level_to=$search_levelcnt