Reconcile log directory calculation scheme for SSL vhosts

diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml
index 1bb622b..48c7f6f 100644 (file)
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -266,7 +266,7 @@ val () = Slave.registerFileHandler (fn fs =>
                                                       print ("Can't find user in " ^ #file fs ^ " or " ^ realVhostFile ^ "!  Taking no action.\n")
                                                   else
                                                       let
-                                                          val vhostId = if OS.Path.ext (#file spl) = SOME ".vhost_ssl" then
+                                                          val vhostId = if OS.Path.ext (#file spl) = SOME "vhost_ssl" then
                                                                             OS.Path.base (#file spl) ^ ".ssl"
                                                                         else
                                                                             OS.Path.base (#file spl)