From 6c2db7df0e40962537ce74d6f6213fac1782bd1b Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 15 May 2013 17:35:51 +0200 Subject: Update dotfiles --- .config/clfswm/Makefile | 4 ---- .config/clfswm/clfswmrc | 25 ------------------------- 2 files changed, 29 deletions(-) delete mode 100644 .config/clfswm/Makefile delete mode 100644 .config/clfswm/clfswmrc (limited to '.config/clfswm') diff --git a/.config/clfswm/Makefile b/.config/clfswm/Makefile deleted file mode 100644 index d79241a..0000000 --- a/.config/clfswm/Makefile +++ /dev/null @@ -1,4 +0,0 @@ -DESTDIR:=$(DESTDIR)/clfswm -objects=clfswmrc - -include ../../dotfiles.mk diff --git a/.config/clfswm/clfswmrc b/.config/clfswm/clfswmrc deleted file mode 100644 index f69623e..0000000 --- a/.config/clfswm/clfswmrc +++ /dev/null @@ -1,25 +0,0 @@ -;; -*- mode: lisp; -*- -(in-package :clfswm) - -(defun start-i3lock () - "Run i3lock" - (do-shell "exec i3lock -c 000000")) - -(defun start-i3lock-2 () - "Run i3lock in second mode" - (setf *second-mode-leave-function* 'start-i3lock) - (leave-second-mode)) - -(defun my-bindings () - (define-main-key ("l" :mod-1 :control) 'start-i3lock) - (define-second-key ("l" :mod-1 :control) 'start-i3lock-2)) - -(add-hook *binding-hook* 'my-bindings) - -;; (defun my-init-hook () -;; (add-frame (create-frame :name "The Gimp" :x 0.6 :y 0 :w 0.3 :h 0.2) *root-frame*)) - -;;y (add-hook *init-hook* 'my-init-hook) - -;;(setf *frame-background* "#252a2b") -;;(setf *frame-foreground* "#eeeeec") -- cgit v1.2.3-54-g00ecf