Snoooopy/dtos-dotfiles
1
0
Fork 0
mirror of https://gitlab.com/dwt1/dotfiles.git synced 2026-04-20 10:44:38 +10:00
Code Issues Packages Projects Releases Wiki Activity

Working on xmobar prior to DTOS launch.

Browse Source
This commit is contained in:
Derek Taylor
2021-09-05 12:52:26 -05:00
parent 1da2e72ee4
commit 3dbfb0bbbb
5 changed files with 75 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
.config/stumpwm/config
View File

@@ -10,12 +10,35 @@
(in-package :stumpwm)
;; load Stump contrib modules
;;(mapc #'load-module '("ttf-fonts"
;; "swm-gaps"))
;;; Startup Programs
;;; Set Background
(run-shell-command "nitrogen --restore")
(run-shell-command "picom")
(run-shell-command "xmodmap ~/.Xmodmap")
(run-shell-command "./.config/herbstluftwm/panel.sh")
;; I change the prefix key to something else besides a keychord.
;; The following three lines are a dirty hack to make SUPER the prefix key.
;; This was originally (set-prefix-key (kbd "C-t"))
(run-shell-command "xmodmap -e 'clear mod4'" t)
(run-shell-command "xmodmap -e \'keycode 133 = F20\'" t)
(set-prefix-key (kbd "F20"))
(ql:quickload "clx-truetype")
(load-module "ttf-fonts")
(xft:cache-fonts) ;; Tell clx-truetype about the fonts you have installed. You really only need to do this once, but putting it here means you will not forget in the future.
;; font settings
(set-font (list (make-instance 'xft:font
:family "Ubuntu"
:subfamily "Bold"
:size 11)
(make-instance 'xft:font
:family "FontAwesome"
:subfamily "Regular"
12)))
;; (set-font "-*-fixed-medium-r-normal-*-*-140-*-*-*-*-*-*")
;;(set-font "-xos4-terminus-medium-r-normal--13-140-72-72-c-80-iso8859-14")
(defvar color1 "#ff92d0")
(defvar color2 "#282a36")
@@ -43,7 +66,7 @@
stumpwm:*mode-line-foreground-color* color1
stumpwm:*mode-line-border-color* "#333333"
stumpwm:*screen-mode-line-format* (list " ")
;; stumpwm:*screen-mode-line-format* (list "%g | %v ^>^7 | " '(:eval (show-hostname)) "| " '(:eval (show-kernel)) "| " '(:eval (show-package-count)) "packages | %d ")
stumpwm:*screen-mode-line-format* (list "%g | %v ^>^7 | " '(:eval (show-hostname)) "| " '(:eval (show-kernel)) "| " '(:eval (show-package-count)) "packages | %d ")
stumpwm:*mode-line-border-width* 1
stumpwm:*mode-line-pad-x* 6
stumpwm:*mode-line-pad-y* 2
@@ -64,13 +87,6 @@
(stumpwm:gnewbg "Nine")
(stumpwm:toggle-mode-line (stumpwm:current-screen) (stumpwm:current-head))
;; I change the prefix key to something else besides a keychord.
;; The following three lines are a dirty hack to make SUPER the prefix key.
;; This was originally (set-prefix-key (kbd "C-t"))
(run-shell-command "xmodmap -e 'clear mod4'" t)
(run-shell-command "xmodmap -e \'keycode 133 = F20\'" t)
(set-prefix-key (kbd "F20"))
;; prompt the user for an interactive command. The first arg is an
;; optional initial contents.
(defcommand colon1 (&optional (initial "")) (:rest)
@@ -102,7 +118,6 @@
(define-key *top-map* (kbd "C-\\") "imove-window")
(define-key *root-map* (kbd "C-m") "mode-line")
;; Launch My Terminal (st)
(define-key *root-map* (kbd "RET") "exec alacritty -e fish")
(define-key *root-map* (kbd "C-c") "exec st")
;; Launch Emacs
@@ -136,14 +151,6 @@
(define-key *root-map* (kbd "M-s") "google")
(define-key *root-map* (kbd "i") "imdb")
;; Message window font;
; (ql:quickload 'clx-truetype)
; (load-module "ttf-fonts")
; (xft:cache-fonts)
; (set-font (make-instance 'xft:font :family "Iosevka Nerd Font" :subfamily "Bold" :size 7 :antialias t))
; (set-font "-*-fixed-medium-r-normal-*-*-140-*-*-*-*-*-*")
(set-font "-xos4-terminus-medium-r-normal--13-140-72-72-c-80-iso8859-14")
;;; Define window placement policy...
;; Clear rules
(clear-window-placement-rules)