   []
   (if (not (.contains (. System getProperty "os.name") "Windows"))
     (sun.misc.Signal/handle
-      (sun.misc.Signal. "HUP")
-      (proxy [sun.misc.SignalHandler] []
-        (handle [sig]
-                (info "Caught SIGHUP, reloading")
-                (reload!))))))
+     (sun.misc.Signal. "HUP")
+     (proxy [sun.misc.SignalHandler] []
+       (handle [sig]
+         (info "Caught SIGHUP, reloading")
+         (reload!))))))
 
 (defn pom-version
   "Return version from Maven POM file."

    (when-not (instance? DynamicClassLoader cl)
      (.setContextClassLoader thread (DynamicClassLoader. cl)))))

(defn -main
  "Start Riemann. Loads a configuration file from the first of its args."
  ([]

  "Process identifier, such as it is on the JVM. :-/"
  []
  (let [name (-> (java.lang.management.ManagementFactory/getRuntimeMXBean)
                 (.getName))]
    (try
      (get (re-find #"^(\d+).*" name) 1)
      (catch Exception e name))))

(defn run-tests-with-format
  "Run all tests matching `test-name-pattern`.
