summaryrefslogtreecommitdiff
path: root/fnl/config/alpha.fnl
blob: 87c45e0fa326c68b70e96165252adb414b0bb9b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
;; A customizable greeter.

(local ascii-art ["     ##############..... ############## "
                  "   ##############......##############   "
                  "     ##########..........##########     "
                  "     ##########........##########       "
                  "     ##########.......##########        "
                  "     ##########.....##########..        "
                  "     ##########....##########.....      "
                  "   ..##########..##########.........    "
                  " ....##########.#########.............  "
                  "   ..################JJJ............    "
                  "     ################.............      "
                  "     ##############.JJJ.JJJJJJJJJJ      "
                  "     ############...JJ...JJ..JJ  JJ     "
                  "     ##########....JJ...JJ..JJ  JJ      "
                  "     ########......JJJ..JJJ JJJ JJJ     "
                  "    ######    .........                 "
                  "                 .....                  "
                  "                   .                    "])

(fn setup []
  (let [alpha (require :alpha)]
    (let [dashboard (require :alpha.themes.dashboard)]
      (set dashboard.section.header.val ascii-art)
      (set dashboard.section.buttons.val
           [(dashboard.button :e "  New file" ":ene <BAR> startinsert <CR>")
            (dashboard.button :f "  Find file"
                              ":Telescope find_files theme=dropdown<CR>")
            (dashboard.button :t "  Find text"
                              ":Telescope live_grep theme=dropdown<CR>")
            (dashboard.button :p "  Find project"
                              ":Telescope projects theme=dropdown<CR>")
            (dashboard.button :r "  Recently used files"
                              ":Telescope oldfiles theme=dropdown<CR>")
            (dashboard.button :c "  Configuration"
                              ":e ~/.config/nvim/init.lua <CR>")
            (dashboard.button :q "  Quit Neovim" ":qa<CR>")])
      (set dashboard.section.header.opts.hl :AlphaHeader)
      (set dashboard.section.buttons.opts.hl :AlphaButtons)
      (set dashboard.opts.opts.noautocmd true)
      (alpha.setup dashboard.opts))))

{1 :goolord/alpha-nvim
 :event :VimEnter
 :config (fn []
           (setup))}