Rev 11707 | Rev 12425 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11707 | Rev 12411 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | 1 | ||
2 | tmp_themelist=!sh find themes -name visitor.phtml | sed 's!^themes/!!;s!/visitor.phtml$!!' |
2 | tmp_themelist=!sh find themes -name visitor.phtml | sed 's!^themes/!!;s!/visitor.phtml$!!' |
3 | tmp_themelist=!words2items $tmp_themelist |
3 | tmp_themelist=!words2items $tmp_themelist |
4 | themelist=$empty |
4 | themelist=$empty |
5 | !for i in $tmp_themelist |
5 | !for i in $tmp_themelist |
6 | test=!defof theme_hide in wimshome/public_html/themes/$i/.def |
6 | test=!defof theme_hide in wimshome/public_html/themes/$i/.def |
7 | !if yes notin $test |
7 | !if yes notin $test |
8 | themelist=!append item $i to $themelist |
8 | themelist=!append item $i to $themelist |
9 | !endif |
9 | !endif |
10 | !next i |
10 | !next i |
11 | iconlist=!sh cd gifs/themes; ls -d */ | sort |
11 | iconlist=!sh cd gifs/themes; ls -d */ | sort |
12 | iconlist=!replace internal / by in $iconlist |
12 | iconlist=!replace internal / by in $iconlist |
13 | iconlist=!words2items $iconlist |
13 | iconlist=!words2items $iconlist |
14 | !for icon_theme in $iconlist |
14 | !for icon_theme in $iconlist |
Line 20... | Line 20... | ||
20 | csslist=!words2items ---- -theme- class $csslist |
20 | csslist=!words2items ---- -theme- class $csslist |
21 | cssfile=!record 0 of wimshome/log/classes/$wims_class/css |
21 | cssfile=!record 0 of wimshome/log/classes/$wims_class/css |
22 | bgimgs=!filelist gifs/bg |
22 | bgimgs=!filelist gifs/bg |
23 | 23 | ||
24 | !if $save!=$empty |
24 | !if $save!=$empty |
25 | !read scripts/setdefr.proc |
25 | !read scripts/setdefr.proc |
26 | !defread wimshome/log/classes/$wims_class/.def |
26 | !defread wimshome/log/classes/$wims_class/.def |
27 | cssfile=$pr_cssfile |
27 | cssfile=$pr_cssfile |
28 | wims_class_log=Modify class presentation by $wims_realuser |
28 | wims_class_log=Modify class presentation by $wims_realuser |
29 | !endif |
29 | !endif |
30 | 30 | ||
31 | !read adm/du $wims_home/log/classes/$wims_class |
31 | !read adm/du $wims_home/log/classes/$wims_class |