Subversion Repositories wimsdev

Rev

Rev 14151 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14151 Rev 16693
Line 15... Line 15...
15
  !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>
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
17
  !exit
18
!endif
18
!endif
19
!reset titb
19
!reset titb
-
 
20
!let p=!positionof item $parm1 in $filelist
-
 
21
!if $embed_file=$empty
-
 
22
  !set embed_file=$p
-
 
23
!else
-
 
24
 !set embed_file=$embed_file.$p
-
 
25
!endif
20
!read $docdir/$doc/$parm1.def
26
!read $docdir/$doc/$parm1.def
21
!set prompt=!item 2 to -1 of $parms
27
!set prompt=!item 2 to -1 of $parms
22
!default prompt=$titb
28
!default prompt=$titb
23
!if $titb=$empty
29
!if $titb=$empty
24
  !default prompt=<span class="tt">$parm1</span>
30
  !default prompt=<span class="tt">$parm1</span>
25
  $prompt
31
  $prompt
26
  <span class="small">$n_nonavailable</span>
32
  <span class="small">$n_nonavailable</span>
27
!else
33
!else
28
  !if $parm2!=.
34
  !if $parm2!=.
29
    !! to embed something not visible
35
    !! to embed something not visible
30
    <a id="$parm1"></a>
36
    <a id="$parm1"></a>
31
  !endif
37
  !endif
32
  $prompt
38
  $prompt
33
  !read $docdir/$doc/$parm1.def content
39
  !read $docdir/$doc/$parm1.def content
34
  !set gotblock=!append item $parm1 to $gotblock
40
  !set gotblock=!append item $parm1 to $gotblock
-
 
41
!endif
-
 
42
!if . isin $embed_file
-
 
43
  !let tmp=!replace internal . by , in $embed_file
-
 
44
  !let tmp=!item 1 to -2 of $tmp
-
 
45
  !let embed_file=!replace internal , by . in $embed_file
-
 
46
!else
-
 
47
  !reset embed_file
35
!endif
48
!endif