 
 (dolist
     (m '(c-mode python-mode sh-mode rust-mode html-mode js-mode haskell-mode
-		markdown-mode yaml-mode ruby-mode org-mode emacs-lisp-mode))
+		markdown-mode yaml-mode ruby-mode org-mode emacs-lisp-mode
+		sql-mode))
   (font-lock-add-keywords m
    ; Fontify "XXX", even in comments.
    '(("\\<\\(XXX\\)" 1 'font-lock-warning-face prepend))))

  ;; I don't use <escape> here for I don't want to break `ESC-ESC-ESC'
  ;; key binding (`keyboard-escape-quit').
  (global-set-key (kbd "s-g") 'god-mode-all)
  (setq god-exempt-major-modes nil god-exempt-predicates nil))

;;; https://www.emacswiki.org/emacs/WinnerMode
(when (fboundp 'winner-mode) (winner-mode))

     (shell . t)))

  (global-set-key "\C-cl" 'org-store-link)
  (global-set-key "\C-cB" 'org-switchb)

  (setq org-outline-path-complete-in-steps nil))

