;;; init-god.el --- make emacs usable -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:

(require-package 'god-mode)
(god-mode)
(global-set-key (kbd "<escape>") #'god-local-mode)

(defun my-god-mode-update-cursor-type ()
  (setq cursor-type (if (or god-local-mode buffer-read-only) 'box 'bar)))

(add-hook 'post-command-hook #'my-god-mode-update-cursor-type)

(define-key god-local-mode-map (kbd ".") #'repeat)

(provide 'init-god)
;;; end of file init-god.el