wat.el

(defun is-enabled-minor-mode (symbol)
  (and (string-match (rx "-mode" eos) (symbol-name symbol))
       (symbol-function symbol)
       (condition-case nil
           (symbol-value symbol)
         (error nil))
       ))
(let ((minor-modes '()))
  (mapatoms #'(lambda (sym)
                (when (is-enabled-minor-mode sym)
                  (setq minor-modes (cons sym minor-modes)))))
  minor-modes)
(magit-auto-revert-mode global-auto-revert-mode font-lock-mode gpm-mouse-mode jit-lock-mode blink-cursor-mode projectile-mode line-number-mode global-eldoc-mode mouse-wheel-mode file-name-shadow-mode auto-compression-mode projectile-global-mode global-git-commit-mode pyvenv-mode shell-dirtrack-mode async-bytecomp-package-mode diff-auto-refine-mode eldoc-mode auto-composition-mode recentf-mode tooltip-mode savehist-mode transient-mark-mode auto-encryption-mode ido-mode override-global-mode global-font-lock-mode elisp-slime-nav-mode)