Subversion Repositories wimsdev

Rev

Rev 14348 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
!if $auth_login=$empty
12498 bpr 2
  job=auth
3
  !exit
23 reyssat 4
!endif
5
 
6
selectshow=!text select $searchchars in $selectshow
7
authdir=$devdir
8
 
9
!if $selectshow!=$empty
12498 bpr 10
  select=tt=`echo "$$$$tt" | egrep '$selectshow'`
23 reyssat 11
!else
12498 bpr 12
  !reset select
23 reyssat 13
!endif
14
 
15
existing=!sh tt=`ls $devdir`\
14348 bpr 16
  echo "$$tt" | grep -c .\
17
  $select\
18
  echo "$$tt" | head -$maxlist
23 reyssat 19
existing=!replace word $devdir by in $existing
20
totalcnt=!line 1 of $existing
21
existing=!line 2 to -1 of $existing
22
existing=!words2items $existing
23
existcnt=!itemcnt $existing
24
 
25
!for i in $deflist
12498 bpr 26
  i_$i=
23 reyssat 27
!next i