Subversion Repositories wimsdev

Rev

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

Rev 13181 Rev 14014
Line 156... Line 156...
156 
!set class_cloningpwd=$up_cloningpwd\
 156 
!set class_cloningpwd=$up_cloningpwd\
157 
in wimshome/log/classes/$wims_class/.def
 157 
in wimshome/log/classes/$wims_class/.def
158 
!endif
 158 
!endif
159 
 
 159 
 
160 
!if $class_type isin 024
 160 
!if $class_type isin 024
161 
  up_regvars=!text select ,$char_alnum in $up_regvars
 - 
 
162 
  up_regvars=!item 1 to $limit_regvars of $up_regvars
 161 
  up_regvars=!item 1 to $limit_regvars of $up_regvars
163 
  up_regvars=!nospace $up_regvars
 162 
  up_regvars=!nospace $up_regvars
164 
  !! MAYBE WE SHOULD TEST LENGTH OF EACH regvar name (not be too long or too short) ?
 163 
  !! MAYBE WE SHOULD TEST LENGTH OF EACH regvar name (not be too long or too short) ?
165 
  !setdef !set class_regvars=$up_regvars in wimshome/log/classes/$wims_class/.def
 164 
  !setdef !set class_regvars=$up_regvars in wimshome/log/classes/$wims_class/.def
166 
!endif
 165 
!endif