diff --git a/lisp/display-hard-drive-space-mode.el b/lisp/display-hard-drive-space-mode.el
index 2d66985..7bdda7b 100644
--- a/lisp/display-hard-drive-space-mode.el
+++ b/lisp/display-hard-drive-space-mode.el
@@ -32,11 +32,10 @@
 
 (defun update-hard-drive-space-string ()
   (->> (get-hard-drive-space)
-       (format " [%s]")
+       (format "[%s]")
        (setq hard-drive-space)))
 
-(define-minor-mode display-hard-drive-space-mode
-  nil nil nil
+(define-minor-mode display-hard-drive-space-mode ""
   :global t
   (cond (display-hard-drive-space-mode
          (add-to-list 'global-mode-string 'hard-drive-space t)