Subversion Repositories wimsdev

Rev

Rev 9164 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !if $wims_read_parm=help
  2.   !read help/$lang/special/editarea.phtml
  3.   !exit
  4. !endif
  5. !read js/edit_area.phtml wimsshow wimsoef
  6.  
  7. !set t_=!translate $    $ to $\
  8. $ in $wims_read_parm
  9. !set td_=0
  10. !set tr_=!rowcnt $t_
  11. !for j=1 to $tr_
  12.   !set l_= !line $j of $t_
  13.   !set td__=!charcnt $l_
  14.   !set td_=$[max($td__,$td_)]
  15. !next
  16.  
  17. <textarea id="wims_show" cols="$[$td_+20]" rows="$tr_" readonly="readonly">$t_</textarea>
  18.