chore: migrate to unique git repo

This commit is contained in:
2019-01-15 11:20:10 +11:00
commit 492c91a204
19 changed files with 3583 additions and 0 deletions

8
lib/README.md Normal file
View File

@@ -0,0 +1,8 @@
## lib
These would normally be installed by `luarocks`; however, given how central they are to the config, they are vendored in instead.
### Versions
- `fennel`: 0.1.1-2
- `fun`: 0.1.3-1

1964
lib/fennel.lua Normal file

File diff suppressed because it is too large Load Diff

1056
lib/fun.lua Normal file

File diff suppressed because it is too large Load Diff

35
lib/keys.fnl Normal file
View File

@@ -0,0 +1,35 @@
;;; lib/keys.fnl --- Key configuration utilities
;;; Commentary:
;; Comments
;;; Code:
(var keys {})
(local awful (require :awful))
(local fun (require :lib.fun))
(local modifiers
{:mod "Mod4"
:alt "Mod1"
:super "Mod4"
:shift "Shift"
:ctrl "Control"})
;;;
;; Functions
(fn map-mods [mods]
(->> mods
(fun.map (partial . modifiers))
(fun.totable)))
(fn keys.key [mods kc fun]
(awful.key (map-mods mods) kc fun))
(fn keys.button [mods bc fun]
(awful.button (map-mods mods) bc fun))
keys
;;; lib/keys.fnl ends here

17
lib/std.fnl Normal file
View File

@@ -0,0 +1,17 @@
;;; std.fnl --- A small standard library
;;; Commentary:
;; Porting a few functions that I'm used to from other Lisps.
;;; Code:
(var std {})
;;;
;; Functions
(fn std.zero? [n]
(= 0 n))
std
;;; std.fnl ends here