Subversion Repositories wimsdev

Rev

Rev 5971 | Rev 12586 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !!##language independant
  2. !if $parm1=$empty
  3.   !exit
  4.  !endif
  5. !if \ isin $parm1$parm2$parm3$parm4
  6.  !for p in 1,2,3,4
  7.   !set parm$p=!slashsubst $(parm$p)
  8.  !next p
  9. !endif
  10. !if / isin $parm1
  11.  !default parm4=style="width:90%;height:300px"
  12.  !set parm3=!replace internal &+ by ; in $parm3
  13.  !set parm3=!replace internal & by ; in $parm3
  14.  !set parm3=!replace internal &+ by ; in $parm3
  15.  !set parm3=!replace internal & by ; in $parm3
  16.  <iframe src="wims.cgi?module=adm/raw&amp;job=lightpopup&amp;emod=$parm1&amp;parm=$parm3;cmd=new;&amp;option=noabout" $parm4></iframe>
  17. !exit
  18. !endif
  19.  !reset titb
  20.  !read $docdir/$doc/$parm1.def
  21.  !set prompt=!item 2 to -1 of $parms
  22.  !default prompt=$titb
  23.  !if $titb=$empty
  24.   !default prompt=<span class="tt">$parm1</span>
  25.   $prompt
  26.   <span class="small">$n_nonavailable</span>
  27.  !else
  28.   <a id="$parm1"></a>
  29.   $prompt
  30.   !read $docdir/$doc/$parm1.def content
  31.   !set gotblock=!append item $parm1 to $gotblock
  32.  !endif
  33.  
  34.