diff --git a/src/system.clj b/src/system.clj
index a555245..dc18b15 100644
--- a/src/system.clj
+++ b/src/system.clj
@@ -46,16 +46,14 @@
      :irc irc}))
 
 (defn stop [system]
-  (do
-    (save-state
-     (get-in system [:config :data-file])
-     (deref (:state system)))
-    (irclj.core/quit (system :irc))))
+  (save-state
+   (get-in system [:config :data-file])
+   (deref (:state system)))
+  (irclj.core/quit (system :irc)))
 
 (defn restart [system-var]
-  (do
-    (stop (deref system-var))
-    (alter-var-root system-var start)))
+  (stop (deref system-var))
+  (alter-var-root system-var start))
 
 (defn -main [& args]
   (let [main-system (system/start nil)]