Subversion Repositories wimsdev

Rev

Rev 14414 | Rev 16243 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14414 Rev 15280
Line 2... Line 2...
2 
  abandon=
 2 
  abandon=
3 
  job=flist
 3 
  job=flist
4 
  !changeto $job.proc
 4 
  !changeto $job.proc
5 
!endif
 5 
!endif
6 
 
 6 
 
7 
!read scripts/getindex $mod
 7 
!read scripts/getindex.proc $mod
8 
!if $title=$empty
 8 
!if $title=$empty
9 
  job=modname
 9 
  job=modname
10 
  !changeto modname.proc
 10 
  !changeto modname.proc
11 
!endif
 11 
!endif
12 
 
 12 
 
Line 15... Line 15...
15 
fname=!text select $allowchar in $fname
 15 
fname=!text select $allowchar in $fname
16 
c=!char 1 of $fname
 16 
c=!char 1 of $fname
17 
!if $c=. or $c=/
 17 
!if $c=. or $c=/
18 
  !goto badname
 18 
  !goto badname
19 
!endif
 19 
!endif
20 
!read files
 20 
!read files.proc
21 
!if $fname notitemof $files
 21 
!if $fname notitemof $files
22 
  !if / notin $fname and .. notin $fname
 22 
  !if / notin $fname and .. notin $fname
23 
    test=!filelist $devdir/$mod/$fname
 23 
    test=!filelist $devdir/$mod/$fname
24 
    !if $test!=$empty
 24 
    !if $test!=$empty
25 
      :badname
 25 
      :badname
Line 68... Line 68...
68 
    makeerror=$makeout
 68 
    makeerror=$makeout
69 
  !endif
 69 
  !endif
70 
  wims_module_log=edit $mod/$fname
 70 
  wims_module_log=edit $mod/$fname
71 
!endif
 71 
!endif
72 
 
 72 
 
73 
content=!mexec scripts/fileread
 73 
content=!mexec scripts/fileread.sh