Subversion Repositories wimsdev

Rev

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

Rev 4846 Rev 5724
Line 45... Line 45...
45 
 n=!linecnt $r
 45 
 n=!linecnt $r
46 
 c=!char 1 of $r
 46 
 c=!char 1 of $r
47 
 !if \ = $c
 47 
 !if \ = $c
48 
  v=!translate internal \{} to $   $ in $r
 48 
  v=!translate internal \{} to $   $ in $r
49 
  v=!word 1 of $v
 49 
  v=!word 1 of $v
50 
  !if $v iswordof title author email css
 50 
  !if $v iswordof title author email css credits
51 
   name$i=$v
 51 
   name$i=$v
52 
   model_$v=!embraced extract $r
 52 
   model_$v=!embraced extract $r
53 
   !if $oef_author!=$empty
 53 
   !if $oef_author!=$empty
54 
    !default model_author=$oef_author
 54 
    !default model_author=$oef_author
55 
    !default model_email=$oef_email
 55 
    !default model_email=$oef_email