Subversion Repositories wimsdev

Rev

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

Rev 16379 Rev 16784
Line 105... Line 105...
105 
  <$pre class="oef_codeinput">
 105 
  <$pre class="oef_codeinput">
106 
  $pretext
 106 
  $pretext
107 
  </$pre>
 107 
  </$pre>
108 
!else
 108 
!else
109 
  !set pretext=$code
 109 
  !set pretext=$code
- 
 
 110 
  !set pretext=!replace internal </label> by in $pretext
110 
  !read themes/$wims_theme/oefcolors
 111 
  !read themes/$wims_theme/oefcolors
111 
  !if $oef_indbad=$empty
 112 
  !if $oef_indbad=$empty
112 
    !read themes/oefcolors
 113 
    !read themes/oefcolors
113 
  !endif
 114 
  !endif
114 
  !for tt = 1 to $parmcnt
 115 
  !for tt = 1 to $parmcnt
115 
    !set ld=!line $tt of $parm
 116 
    !set ld=!line $tt of $parm
116 
    !distribute item $ld into m_,inputsize_tmp,css
 117 
    !distribute item $ld into m_,inputsize_tmp,css
117 
    !default inputsize_tmp=$inputsize
 118 
    !default inputsize_tmp=$inputsize
118 
    !if $(ld[1]) isin $pretext
 119 
    !if $(ld[1]) isin $pretext
- 
 
 120 
      !set pretext=!replace internal <label for="reply$tt"> by in $pretext
119 
      !set m_=!text select 0123456789 in $(ld[1])
 121 
      !set m_=!text select 0123456789 in $(ld[1])
120 
      !default reply_$m_=$(reply$m_)
 122 
      !default reply_$m_=$(reply$m_)
121 
      !set tt=!word 1 of $(replygood$m_)
 123 
      !set tt=!word 1 of $(replygood$m_)
122 
      !if $tt!=?analyze
 124 
      !if $tt!=?analyze
123 
        !set cl=!nospace oef_ind$(diareply$m_)
 125 
        !set cl=!nospace oef_ind$(diareply$m_)