summaryrefslogtreecommitdiff
path: root/fnl/config/alpha.fnl
blob: c269d1795b0dda9e2530382f79bac3a89a2d7bed (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
;; A customizable greeter.
(module config.alpha {autoload {util util}})

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

(let [alpha (util.load-plugin :alpha)]
  (let [dashboard (require :alpha.themes.dashboard)]
    (set dashboard.section.header.val ascii-art)
    (set dashboard.section.buttons.val
         [(dashboard.button :f "  Find file" ":lua require'lir.float'.toggle()<CR>")
          (dashboard.button :e "  New file" ":ene <BAR> startinsert <CR>")
          (dashboard.button :p "  Find project" ":Telescope projects <CR>")
          (dashboard.button :r "  Recently used files"
                            ":Telescope oldfiles <CR>")
          (dashboard.button :t "  Find text" ":Telescope live_grep <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)))