Revision 19e256f2
Von Moritz Bunkus vor etwa 18 Jahren hinzugefügt
| bin/mozilla/admin.pl | ||
|---|---|---|
|
}
|
||
|
|
||
|
opendir TEMPLATEDIR, "$templates/." or $form->error("$templates : $!");
|
||
|
@all = grep !/^\.\.?$/, readdir TEMPLATEDIR;
|
||
|
@all = grep({ !/^\.\.?$/ && -d "$templates/$_" } readdir(TEMPLATEDIR));
|
||
|
closedir TEMPLATEDIR;
|
||
|
|
||
|
@allhtml = sort grep /\.html/, @all;
|
||
|
@alldir = grep !/\.(html|tex|sty|odt)$/, @all;
|
||
|
@alldir = grep !/\.(html|tex|sty|odt|xml|txb)$/, @all;
|
||
|
@alldir = grep !/^(webpages|\.svn)$/, @alldir;
|
||
|
|
||
|
@allhtml = reverse grep !/Default/, @allhtml;
|
||
Auch abrufbar als: Unified diff
Die Drop-Down-Box "Benutze Vorlagen" wirklich nur mit Verzeichnissen füllen und zusätzlich die Endungen ".xml" und ".txb" ignorieren, falls ein Benutzer auf den schrägen Gedanken kommen sollte, ein Verzeichnis so zu benennen.