aboutsummaryrefslogtreecommitdiff
path: root/setup.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'setup.lisp')
-rw-r--r--setup.lisp18
1 files changed, 4 insertions, 14 deletions
diff --git a/setup.lisp b/setup.lisp
index 76db85c..8d18fc1 100644
--- a/setup.lisp
+++ b/setup.lisp
@@ -1,33 +1,23 @@
(in-package :stumpwm)
+(setf *module-dir* "~/.stumpwm.d/modules/")
+(init-load-path *module-dir*)
+
#-quicklisp
(let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
(user-homedir-pathname))))
(when (probe-file quicklisp-init)
(load quicklisp-init)))
-(ql:quickload :alexandria)
(ql:quickload :bordeaux-threads)
(ql:quickload :str)
(ql:quickload :clx-truetype)
-(ql:quickload :stumpwm-prescient)
(ql:quickload :xembed)
(ql:quickload :slynk)
-(defun install-from-git (repo &key (forge "https://github.com"))
- (declare (type string repo))
- (let* ((qldir "~/quicklisp/local-projects")
- (target-dir
- (format nil "~a/~a"
- qldir
- (second (str:split #\/ repo)))))
- (unless (uiop:directory-exists-p target-dir)
- (uiop:chdir qldir)
- (uiop:run-program (format nil "git clone ~a/~a" (string-trim "/" forge) repo)))))
-
-(install-from-git "landakram/stumpwm-prescient")
(load-module "app-menu")
(load-module "end-session")
(load-module "pass")
(load-module "stump-volume-control")
(load-module "ttf-fonts")
+(load-module "stumptray")