EVar -> EString in default for DefaultWebNode
authorClinton Ebadi <clinton@unknownlamer.org>
Sun, 9 Dec 2012 06:18:33 +0000 (01:18 -0500)
committerClinton Ebadi <clinton@unknownlamer.org>
Sun, 9 Dec 2012 06:18:33 +0000 (01:18 -0500)
Even sml lets you do stupid things!

src/plugins/easy_domain.sml

index 2d7110c..63601d2 100644 (file)
@@ -52,6 +52,6 @@ val _ = Defaults.registerDefault ("AddMX",
 
 val _ = Defaults.registerDefault ("DefaultWebNode",
                                  (TBase "web_node", dl),
-                                 (fn () => (EVar "mire", dl)))
+                                 (fn () => (EString "mire", dl)))
 
 end