Rev 16143 | Rev 16154 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 16143 | Rev 16153 | ||
---|---|---|---|
Line 66... | Line 66... | ||
66 | !if $allowtype=select |
66 | !if $allowtype=select |
67 | allow_parm=$IPlist |
67 | allow_parm=$IPlist |
68 | !endif |
68 | !endif |
69 | old_allowtype=$allowtype |
69 | old_allowtype=$allowtype |
70 | old_allowtechvar=$allowtechvar |
70 | old_allowtechvar=$allowtechvar |
71 |
|
71 | !if $allowtype=techvar |
72 |
|
72 | !readproc adm/vfilter/shexselect.proc .S$seq |
73 |
|
73 | !endif |
74 | 74 | ||
75 | !! ---- save modification of allow parameters for sequence |
75 | !! ---- save modification of allow parameters for sequence |
76 | !if $save!=$empty |
76 | !if $save!=$empty |
77 | !if $sharers!=$empty and $allowshare=1 |
77 | !if $sharers!=$empty and $allowshare=1 |
78 | setclass=!items2words $wims_class,$sharers |
78 | setclass=!items2words $wims_class,$sharers |
Line 139... | Line 139... | ||
139 | $s_ |
139 | $s_ |
140 | !endif |
140 | !endif |
141 | !endif |
141 | !endif |
142 | 142 | ||
143 | !! --- read saving configuration for allow parameters initial time and after saving |
143 | !! --- read saving configuration for allow parameters initial time and after saving |
144 | !if |
144 | !if $save!=$empty |
145 | !readproc adm/vfilter/shexread.proc S$seq |
145 | !readproc adm/vfilter/shexread.proc S$seq |
146 | !! to distribute IPlist content into variable |
146 | !! to distribute IPlist content into variable |
147 | !read adm/scorerestriction put\ |
147 | !read adm/scorerestriction put\ |
148 | $IPlist |
148 | $IPlist |
149 | !endif |
149 | !endif |
150 | old_allowtype=$allowtype |
150 | old_allowtype=$allowtype |
151 | old_allowtechvar=$allowtechvar |
151 | old_allowtechvar=$allowtechvar |
152 | !reset |
152 | !reset save |
153 | !! --- end of reading |
153 | !! --- end of reading |
154 | 154 |