Compare commits

...

10 Commits

4 changed files with 67 additions and 40 deletions

View File

@ -10,7 +10,7 @@ export GTK_USE_PORTAL=1
export KRITA_NO_STYLE_OVERRIDE=1
# misc
export PATH=$HOME/.local/bin:$HOME/.gem/ruby/2.6.0/bin:$PATH
export PATH=$HOME/.local/bin:$HOME/.gem/ruby/2.6.0/bin:$HOME/.cabal/bin:$PATH
export DOOMWADDIR=/media/store/games/doom/iwads
export EDITOR=vim
export WINEPREFIX=$HOME/progs/winepfx

View File

@ -6,7 +6,7 @@
(defvar agw-mode-map (make-sparse-keymap)
"Global keymap for `agw-mode'.")
(define-minor-mode agw-key-map
(define-minor-mode agw-key-map-mode
"Minor mode for key bindings."
:global t
:keymap agw-mode-map)
@ -15,29 +15,24 @@
"Binds a key into `agw-mode-map'."
(define-key agw-mode-map (kbd (concat "C-<tab> " key)) def))
(defun agw-touch (fname)
"Touches a file asynchronously."
(interactive "FFile to touch: ")
(start-process "agw-touch" nil "touch" (expand-file-name fname)))
(defun agw-prog-mode ()
"Sets up `prog-mode'."
(setq-local tab-always-indent nil)
(setq-local tab-width 3)
(setq-local standard-indent 3)
(setq-local indent-tabs-mode t))
(setq-local tab-always-indent nil
tab-width 3
standard-indent 3
indent-tabs-mode t))
(defun agw-fp-mode ()
"Sets up lisp and other functional language major modes."
(setq-local indent-tabs-mode nil)
(setq-local standard-indent 2)
(setq-local tab-width 2))
(setq-local indent-tabs-mode nil
standard-indent 2
tab-width 2))
(defun agw-org-mode ()
"Sets up `org-mode'."
(setq-local indent-tabs-mode nil)
(setq-local standard-indent 2)
(setq-local tab-width 2))
(setq-local indent-tabs-mode nil
standard-indent 2
tab-width 2))
(defun agw-remove-elc ()
"Removes an elc file if it exists."
@ -49,4 +44,12 @@
"Sets up `emacs-lisp-mode'."
(add-hook 'after-save-hook #'agw-remove-elc nil t))
(defun agw-evil-visual-state-tag (&optional selection)
"Displays the mode for the visual state."
(let ((selection (or selection evil-visual-selection)))
(cond ((eq selection 'char) "v")
((eq selection 'line) "V")
((eq selection 'screen-line) "ʌ")
((eq selection 'block) "Λ"))))
;; EOF

View File

@ -23,7 +23,22 @@
sentence-end-double-space nil)
(set-face-attribute 'variable-pitch nil :height 120 :family "Source Sans Pro")
(set-face-attribute 'fixed-pitch nil :height 120 :family "Source Code Pro")
(set-face-attribute 'fixed-pitch nil :height 120 :family "Source Code Pro")
(dolist (range '((#x2310 . #x26bf)
(#x26c0 . #x329f)
(#x1f000 . #x1fa9f)))
(set-fontset-font t range "Noto Color Emoji"))
(set-fontset-font t '(#x2e80 . #x9fff) "Noto Sans CJK JP")
;; mode line
(setq-default mode-line-format
'("%+"
mode-line-buffer-identification
mode-line-modes
"%5l↑ %5c→ %5i= "
mode-line-percent-position))
;; scrolling
(setq scroll-conservatively 101
@ -54,11 +69,9 @@
(agw-set-key "k" #'windmove-up)
(agw-set-key "l" #'windmove-right)
(agw-set-key "t" #'agw-touch)
(agw-key-map-mode)
(agw-key-map)
(global-set-key (kbd "C-x C-<tab>") #'agw-key-map)
(global-set-key (kbd "C-x C-<tab>") #'agw-key-map-mode)
;; packages
(require 'package)
@ -77,21 +90,10 @@
(setq rand-theme-wanted '(base16-atelier-cave
base16-atelier-forest
base16-atelier-heath))
(rand-theme))
(use-package doom-modeline
:ensure t
:after evil
:hook (after-init . doom-modeline-mode)
:init
(setq doom-modeline-bar-width 3
doom-modeline-buffer-encoding nil
doom-modeline-buffer-file-name-style 'truncate-with-project
doom-modeline-major-mode-icon nil
doom-modeline-minor-modes t
doom-modeline-project-detection 'project
doom-modeline-vcs-max-length 8)
(set-face-attribute 'mode-line nil :background "black"))
(rand-theme)
(set-face-attribute 'mode-line nil
:background "#0a0a0a"
:foreground "#92ebf0"))
;; major modes
(use-package cc-mode
@ -111,7 +113,12 @@
:hook (haskell-mode . agw-fp-mode))
(use-package markdown-mode
:ensure t)
:ensure t
:hook ((markdown-mode . variable-pitch-mode)
(markdown-mode . flyspell-mode))
:config
(dolist (face '(markdown-inline-code markdown-code))
(set-face-attribute face nil :inherit 'fixed-pitch)))
(use-package ruby-mode
:init
@ -265,11 +272,19 @@
:init
(setq require-final-newline t))
(use-package iedit
:ensure t
:init
(setq iedit-toggle-key-default nil)
:config
(agw-set-key "s" #'iedit-mode))
;; file management
(use-package dired
:config
(setq dired-listing-switches "-alhp --si")
(agw-set-key "f" #'dired-jump))
(agw-set-key "f" #'dired-jump)
(agw-set-key "t" #'dired-create-empty-file))
(use-package ranger
:ensure t
@ -298,9 +313,18 @@
:init
(setq evil-cjk-emacs-word-boundary t
evil-cross-lines t
evil-mode-line-format 'after
evil-shift-width 3
evil-vsplit-window-right t
evil-want-keybinding nil)
;; tags
(setq evil-normal-state-tag "~"
evil-insert-state-tag "i"
evil-operator-state-tag "o"
evil-replace-state-tag "r"
evil-visual-state-tag 'agw-evil-visual-state-tag
evil-motion-state-tag "m"
evil-emacs-state-tag "x")
:config
(evil-mode t)

View File

@ -7,7 +7,7 @@ maximized = False
dark_theme = True
runners_manager_width = 800
runners_manager_height = 800
show_advanced_options = False
show_advanced_options = True
dismiss-missing-vulkan-library-warning = True
filter_installed = False
view_type = grid