anchor.diff:  
       # Generate directives for the main server.
       ${perServerConf true mainCfg}
  -
  -    # Always enable virtual hosts; it doesn't seem to hurt.
  -    ${let
  -        listen = concatMap getListen allHosts;
  -        uniqueListen = uniqList {inputList = listen;};
  -        directives = concatMapStrings (listen: "NameVirtualHost ${listenToString listen}\n") uniqueListen;
  -      in optionalString (!version24) directives
  -    }
   
       ${let
           makeVirtualHost = vhost: ''
  
positive.code:           ''
              mkdir -m 0750 -p ${mainCfg.stateDir}
              [ $(id -u) != 0 ] || chown root.${mainCfg.group} ${mainCfg.stateDir}
              ${optionalString version24 ''
                mkdir -m 0750 -p "${mainCfg.stateDir}/runtime"
                [ $(id -u) != 0 ] || chown root.${mainCfg.group} "${mainCfg.stateDir}/runtime"
              ''}
              mkdir -m 0700 -p ${mainCfg.logDir}
  
              # Get rid of old semaphores.  These tend to accumulate across
  
negative.code:   mainCfg = config.services.httpd;
  
    httpd = mainCfg.package.out;
  
    httpdConf = mainCfg.configFile;
  
  