else
"/afs/hcoop.net/common/etc/domtool/backup/apache2/"
-val defaultPhpVersion = 4
+val defaultPhpVersion = 5
val waklogUserFile = "/var/domtool/waklog.conf"
extern val use_cert : ssl_cert_path -> ssl;
extern type php_version;
-extern val php4 : php_version;
extern val php5 : php_version;
extern val vhost : host -> Vhost => [Domain]
(fn () => (EVar "true", dl))),
("PhpVersion",
(TBase "php_version", dl),
- (fn () => (EVar "php4", dl)))]
+ (fn () => (EVar "php5", dl)))]
val () = app Defaults.registerDefault defaults
write "</VirtualHost>\n";
app (TextIO.closeOut o #2) (!vhostFiles))
-val php_version = fn (EVar "php4", _) => SOME 4
- | (EVar "php5", _) => SOME 5
+val php_version = fn (EVar "php5", _) => SOME 5
| _ => NONE
fun vhostBody (env, makeFullHost) =