Subversion Repositories wimsdev

Rev

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

Rev 16213 Rev 16693
Line 2... Line 2...
2 
!set parm1=!text select /$namechars in $parm1
 2 
!set parm1=!text select /$namechars in $parm1
3 
!set parm1=!char 1 to $namelim of $parm1
 3 
!set parm1=!char 1 to $namelim of $parm1
- 
 
 4 
!set kblock=!positionof item $block in $filelist
4 
 
 5 
 
5 
!if $parm1=$block or $parm1=$empty
 6 
!if $parm1=$block or $parm1=$empty
6 
  !default parm2=??
 7 
  !default parm2=??
7 
  !set parm2=!slashsubst $parm2
 8 
  !set parm2=!slashsubst $parm2
8 
  !set pp=!item 3 to -1 of $parms
 9 
  !set pp=!item 3 to -1 of $parms
9 
  !set pp=!slashsubst $pp
 10 
  !set pp=!slashsubst $pp
10 
  <a id="primi$serial"></a>
 11 
  <a id="primi$(embed_file).$serial"></a>
11 
  !if $doc/$block.$serial notitemof $foldlist and $printable!=yes
 12 
  !if $doc/$kblock.$(embed_file).$serial notitemof $foldlist and $printable!=yes
12 
    !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $parm2
 13 
    !href cmd=reply&job=read&foldin=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $parm2
13 
  !else
 14 
  !else
14 
    $pp
 15 
    $pp
15 
    !if $printable!=yes
 16 
    !if $printable!=yes
16 
      !set wims_ref_class=wims_button small
 17 
      !set wims_ref_class=wims_button small
17 
      !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
 18 
      !href cmd=reply&job=read&foldout=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
18 
    !endif
 19 
    !endif
19 
  !endif
 20 
  !endif
20 
  !exit
 21 
  !exit
21 
!endif
 22 
!endif
22 
 
 23 
 
Line 27... Line 28...
27 
!if $titb=$empty
 28 
!if $titb=$empty
28 
  !default prompt=<span class="tt">$parm1</span>
 29 
  !default prompt=<span class="tt">$parm1</span>
29 
  $prompt
 30 
  $prompt
30 
  <span class="small">$n_nonavailable</span>
 31 
  <span class="small">$n_nonavailable</span>
31 
!else
 32 
!else
32 
  <a id="primi$serial"></a>
 33 
  <a id="primi$(embed_file).$serial"></a>
33 
  $prompt
 34 
  $prompt
34 
  !if $printable=yes
 35 
  !if $printable=yes
35 
    !goto alwaysin
 36 
    !goto alwaysin
36 
  !endif
 37 
  !endif
37 
  !set wims_ref_class=wims_button small
 38 
  !set wims_ref_class=wims_button small
38 
  !if $doc/$block.$serial notitemof $foldlist and robot notin $session
 39 
  !if $doc/$kblock.$(embed_file).$serial notitemof $foldlist and robot notin $session
39 
    !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $wims_name_detail
 40 
    !href cmd=reply&job=read&foldin=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $wims_name_detail
40 
  !else
 41 
  !else
41 
    !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
 42 
    !href cmd=reply&job=read&foldout=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
42 
    :alwaysin
 43 
    :alwaysin
43 
    !set blocksave=$blocksave $block
 44 
    !set blocksave=$blocksave $block
44 
    !set block=$parm1
 45 
    !set block=$parm1
45 
    !read $docdir/$doc/$parm1.def content
 46 
    !read $docdir/$doc/$parm1.def content
46 
    !set block=!word -1 of $blocksave
 47 
    !set block=!word -1 of $blocksave