Subversion Repositories wimsdev

Rev

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

Rev 15987 Rev 15988
Line 13... Line 13...
13 
!endif
 13 
!endif
14 
 
 14 
 
15 
!if $cmd=reply
 15 
!if $cmd=reply
16 
  seq_desc=!replace internal $\
 16 
  seq_desc=!replace internal $\
17 
$ by $ $ in $seq_desc
 17 
$ by $ $ in $seq_desc
- 
 
 18 
  seq_title=!char 1 to $title_limit of $seq_title
- 
 
 19 
  seq_desc=!char 1 to $desc_limit of $seq_desc
18 
  new_data=:$seq_title\
 20 
  new_data=:$seq_title\
19 
  $seq_desc
 21 
  $seq_desc
20 
 
 22 
 
21 
  !set listdoc=!makelist doc_ i for i=1 to $docpubliccnt
 23 
  !set listdoc=!makelist doc_ i for i=1 to $docpubliccnt
22 
  !set listc=!filelist $wims_home/log/classes/$wims_class/doc
 24 
  !set listc=!filelist $wims_home/log/classes/$wims_class/doc