;;; ll-navigate --- luki navigate -*- lexical-binding: t -*-
;;
;;; Commentary:
;;
;;; Code:

(require 'cl-lib)
(cl-pushnew "." load-path :test #'string=)

(require 'll             nil t)
(require 'll-buffer-menu nil t)

(define-prefix-command   'C-j-prefix)
(keymap-global-set "C-j" 'C-j-prefix)

(keymap-global-set "C-j ." (L () (find-file ".")))
(keymap-global-set "C-j a" (L () (find-file "~/.alacritty.toml")))
(keymap-global-set "C-j e" (L () (find-file "~/.emacs")))
(keymap-global-set "C-j f" (L () (find-file "~/.emacs.d/emacs-init/ll/ll-face.el")))
(keymap-global-set "C-j i" (L () (find-file "~/.emacs.d/emacs-init/ll/ll-ide.el")))
(keymap-global-set "C-j j" (L () (find-file "~/.emacs.d/emacs-init/ll/juv.el")))
(keymap-global-set "C-j k" (L () (find-file "~/.emacs.d/emacs-init/ll/ll-keys.el")))
(keymap-global-set "C-j d" (L () (find-file "~/.emacs.d/emacs-init/ll/.")))
(keymap-global-set "C-j m" (L () (find-file "~/moe-elisp/moe-init.el")))
(keymap-global-set "C-j n" (L () (find-file "~/.emacs.d/emacs-init/ll/ll-navigate.el")))
(keymap-global-set "C-j s" (L () (find-file "~/src/el-gpu")))
(keymap-global-set "C-j w" (L () (find-file "~/.cwmrc")))

(provide 'll-navigate)
;;; ll-navigate.el ends here