Subversion Repositories wimsdev

Rev

Rev 16687 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16687 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
- 
 
 5 
 
4 
 
 6 
 
5 
!if $parm1=$block or $parm1=$empty
 7 
!if $parm1=$block or $parm1=$empty
6 
  !default parm2=??
 8 
  !default parm2=??
7 
  !set parm2=!slashsubst $parm2
 9 
  !set parm2=!slashsubst $parm2
8 
  !set pp=!item 3 to -1 of $parms
 10 
  !set pp=!item 3 to -1 of $parms
9 
  !set pp=!slashsubst $pp
 11 
  !set pp=!slashsubst $pp
10 
  <a id="primi$(embed_file).$serial"></a>
 12 
  <a id="primi$(embed_file).$serial"></a>
11 
  !if $doc/$block.$(embed_file).$serial notitemof $foldlist and $printable!=yes
 13 
  !if $doc/$kblock.$(embed_file).$serial notitemof $foldlist and $printable!=yes
12 
    !href cmd=reply&job=read&foldin=$block.$(embed_file).$serial#primi$(embed_file).$serial $parm2
 14 
    !href cmd=reply&job=read&foldin=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $parm2
13 
  !else
 15 
  !else
14 
    $pp
 16 
    $pp
15 
    !if $printable!=yes
 17 
    !if $printable!=yes
16 
      !set wims_ref_class=wims_button small
 18 
      !set wims_ref_class=wims_button small
17 
      !href cmd=reply&job=read&foldout=$block.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
 19 
      !href cmd=reply&job=read&foldout=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
18 
    !endif
 20 
    !endif
19 
  !endif
 21 
  !endif
20 
  !exit
 22 
  !exit
21 
!endif
 23 
!endif
22 
 
 24 
 
Line 38... Line 40...
38 
  $prompt
 40 
  $prompt
39 
  !if $printable=yes
 41 
  !if $printable=yes
40 
    !goto alwaysin
 42 
    !goto alwaysin
41 
  !endif
 43 
  !endif
42 
  !set wims_ref_class=wims_button small
 44 
  !set wims_ref_class=wims_button small
43 
  !if $doc/$block.$(embed_file).$serial notitemof $foldlist and robot notin $session
 45 
  !if $doc/$kblock.$(embed_file).$serial notitemof $foldlist and robot notin $session
44 
    !href cmd=reply&job=read&foldin=$block.$(embed_file).$serial#primi$(embed_file).$serial $wims_name_detail
 46 
    !href cmd=reply&job=read&foldin=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $wims_name_detail
45 
  !else
 47 
  !else
46 
    !href cmd=reply&job=read&foldout=$block.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
 48 
    !href cmd=reply&job=read&foldout=$kblock.$(embed_file).$serial#primi$(embed_file).$serial $n_foldout
47 
    !if $editable=yes
 49 
    !if $editable=yes
48 
      !set wims_ref_class=wims_button small
 50 
      !set wims_ref_class=wims_button small
49 
      !href cmd=reply&job=edit&doc=$doc&block=$parm1 $wims_name_Edit
 51 
      !href cmd=reply&job=edit&doc=$doc&block=$parm1 $wims_name_Edit
50 
    !endif
 52 
    !endif
51 
    :alwaysin
 53 
    :alwaysin