Subversion Repositories wimsdev

Rev

Rev 3549 | Rev 5894 | 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.  <iframe src="wims.cgi?module=adm/raw&amp;job=lightpopup&amp;noabout=yes&amp;emod=$parm1&amp;parm=$parm3&amp;option=noabout"
  12. width="100%" height="100%"></iframe>
  13. !exit
  14. !endif
  15.  !reset titb
  16.  !read $docdir/$doc/$parm1.def
  17.  !set prompt=!item 2 to -1 of $parms
  18.  !default prompt=$titb
  19.  !if $titb=$empty
  20.   !default prompt=<tt>$parm1</tt>
  21.   $prompt
  22.   <small>$n_nonavailable</small>
  23.  !else
  24.   <a name="$parm1"></a>
  25.   $prompt
  26.   !read $docdir/$doc/$parm1.def content
  27.   !set gotblock=!append item $parm1 to $gotblock
  28.  !endif
  29.  
  30.