diff --git a/mood-line.el b/mood-line.el
index 93a4cae..0b32857 100644
--- a/mood-line.el
+++ b/mood-line.el
@@ -348,10 +348,18 @@ The `Face' may be either a face symbol or a property list of key-value pairs
                       mood-line-meow-state-alist)))
       (concat (propertize (car mode-cons) 'face (cdr mode-cons)) " "))))
 
+(defun mood-line-segment-god ()
+  "Indicate whether or not god-mode is active."
+  (if (bound-and-true-p god-local-mode)
+      '(:propertize "<G> "
+                    face (:inherit mood-line-status-warning))
+    "--- "))
+
 (defun mood-line-segment-modal ()
   "Call the correct mode-line segment when the first modal-mode is found."
   (cond ((bound-and-true-p evil-mode) (mood-line-segment-evil))
-        ((bound-and-true-p meow-mode) (mood-line-segment-meow))))
+        ((bound-and-true-p meow-mode) (mood-line-segment-meow))
+        ((featurep 'god-mode) (mood-line-segment-god))))
 
 ;;
 ;; Activation function