Subversion Repositories wimsdev

Rev

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

Rev 12595 Rev 12836
Line 107... Line 107...
107
  tools,4,module=home,tool\
107
  tools,4,module=home,tool\
108
  to $1_
108
  to $1_
109
!endif
109
!endif
110
 
110
 
111
!if $wims_developer!=$empty and COPYING isin $module_copyright and ../classes/ notin ../$module
111
!if $wims_developer!=$empty and COPYING isin $module_copyright and ../classes/ notin ../$module
112
 !set V_=!char 1 of $module
112
  !set V_=!char 1 of $module
113
 !set M_=!translate internal / to , in $module
113
  !set M_=!translate internal / to , in $module
114
 !set M_=!item 1 of $M_
114
  !set M_=!item 1 of $M_
115
 !if $V_ isin ABCDEFGHIJKLMNOPQRTSUVWXYZ or $M_ iswordof local contrib tool
115
  !if $V_ isin ABCDEFGHIJKLMNOPQRTSUVWXYZ or $M_ iswordof local contrib tool
116
  !set 1_=!append line modify,1,module=adm/modtool&original=$module to $1_
116
    !set 1_=!append line modify,1,module=adm/modtool&original=$module to $1_
117
 !endif
117
  !endif
-
 
118
!endif
-
 
119
!if $wims_user=supervisor and $module=adm/class/glossary
-
 
120
  !set 1_=!append line newglose,1,module=adm/tool/glossary&gl=0 to $1_
118
!endif
121
!endif
119
 
-
 
120
!if $wims_user=supervisor and ((_adm/doc notin _$module and adddoc notin $module and (document iswordof $module_category or tool iswordof $module_category))\
122
!if $wims_user=supervisor and ((_adm/doc notin _$module and adddoc notin $module \
-
 
123
  and (document iswordof $module_category or tool iswordof $module_category))\
121
   or _c isin _$doc)
124
   or _c isin _$doc)
122
  !if document iswordof $module_category or _c isin _$doc
125
  !if document iswordof $module_category or _c isin _$doc
123
    !set wims_homeref_parm=block=$block&doc=$doc
126
    !set wims_homeref_parm=block=$block&doc=$doc
124
  !endif
127
  !endif
125
  !if adm/tool/glossary isin $module
128
  !if adm/tool/glossary isin $module
Line 128... Line 131...
128
        !set wims_homeref_parm=!getopt gloss_item in $module_init_parm
131
        !set wims_homeref_parm=!getopt gloss_item in $module_init_parm
129
        !set 1_=!append line addglossary,1,module=adm/class/glossary&job=add&iniparm=$wims_homeref_parm to $1_
132
        !set 1_=!append line addglossary,1,module=adm/class/glossary&job=add&iniparm=$wims_homeref_parm to $1_
130
      !endif
133
      !endif
131
    !else
134
    !else
132
      !set wims_homeref_parm=gl=$gl
135
      !set wims_homeref_parm=gl=$gl
-
 
136
      !set 1_=!append line newglose,1,module=adm/tool/glossary&gl=0 to $1_
133
    !endif
137
    !endif
134
  !else
138
  !else
135
    !if _c notin _$doc
139
    !if _c notin _$doc
136
      !set 1_=!append line adddoc,1,module=adm/class/adddoc&job=add&dir=$module&iniparm=$wims_homeref_parm to $1_
140
      !set 1_=!append line adddoc,1,module=adm/class/adddoc&job=add&dir=$module&iniparm=$wims_homeref_parm to $1_
137
    !endif
141
    !endif