Changeset bec93c6 in dotfiles


Ignore:
Timestamp:
Dec 6, 2021, 4:40:08 AM (3 years ago)
Author:
Mikhail Kirillov <w96k@…>
Branches:
master
Children:
4be6500
Parents:
d8c64ac
Message:

Changes

Files:
5 edited

Legend:

Unmodified
Added
Removed
  • guix/.config/nyxt/init.lisp

    rd8c64ac rbec93c6  
    1 (define-configuration buffer
    2     ((default-modes
    3          (append '(emacs-mode
    4                    noscript-mode
    5                    web-mode
    6                    base-mode
    7                    force-https-mode)
    8                  %slot-default))))
     1;; -*- mode: common-lisp -*-
     2
     3;; (define-configuration buffer
     4;;     ((default-modes
     5;;       (append '(emacs-mode
     6;;                 noscript-mode
     7;;                 nowebgl-mode
     8;;                 ;;web-mode
     9;;                 ;;web-buffer
     10;;                 ;;base-mode
     11;;                 force-https-mode)
     12;;               %slot-default))))
  • guix/config.scm

    rd8c64ac rbec93c6  
    11(use-modules (gnu)
    2              (srfi srfi-1))
     2             (srfi srfi-1)
     3             (guix packages))
    34
    45(use-service-modules
     
    2324 xdisorg)
    2425
    25 (define %cpupower-service
    26   (simple-service
    27    'cpupower activation-service-type
    28    #~(zero? (system* #$(file-append cpupower "/bin/cpupower")
    29                      "frequency-set"
    30                      "--governor"
    31                      "schedutil"))))
     26;; (define-public linux-libre-custom
     27;;   (package
     28;;     (inherit linux-libre)
     29;;     (native-inputs
     30;;      `(("kconfig" ,(local-file "fb.config"))
     31;;       ,@(alist-delete "kconfig"
     32;;                       (package-native-inputs linux-libre))))))
     33
     34;; (define %cpupower-service
     35;;   (simple-service
     36;;    'cpupower activation-service-type
     37;;    #~(zero? (system* #$(file-append cpupower "/bin/cpupower")
     38;;                   "frequency-set"
     39;;                   "--governor"
     40;;                   "schedutil"))))
    3241
    3342(operating-system
     
    4049   '("grp:shifts_toggle"
    4150     "caps:ctrl_modifier")))
    42  (kernel linux-libre-5.11)
    43  
     51 (kernel linux-libre)
     52 (kernel-loadable-modules '())
    4453 (kernel-arguments
    45   '("consoleblank=0"
    46     "processor.max_cstate=3"  ; Disable power savings
    47     "intel_idle.max_cstate=2" ; (cstate 3-4 provides
     54   '("consoleblank=0"
     55     "processor.max_cstate=3"  ; Disable power savings
     56     "intel_idle.max_cstate=2" ; (cstate 3-4 provides
    4857                                        ; high freq cpu noice)
    49     "vblank_mode=0"
    50     "vm.swappiness=5"
    51     ;;"thinkpad_acpi.fan_control=1"
    52    
    53     ;;"ahci.mobile_lpm_policy=1"
    54     "KVM"
    55 
    56    
    57     "i915.modeset=1"
    58    
    59     "intremap=off"     ; Fix for failed to map dmar2
    60     "modprobe.blacklist=pcspkr,usbmouse,usbkbd"
    61    
    62     "logo.nologo"
    63     "loglevel=4"))
    64  ;;(initrd-modules (append '("i915") %base-initrd-modules))
    65  (host-name "libreboot-x200t")
     58     "vblank_mode=0"
     59     ;;"vm.swappiness=5"
     60     "thinkpad_acpi.fan_control=1"
     61     "rootfstype=ext4"
     62     "KVM"
     63     "loglevel=7"
     64     ;;"logo"
     65     
     66     "intremap=off"     ; Fix for failed to map dmar2
     67     "modprobe.blacklist=pcspkr,usbmouse,usbkbd,glx"))
     68 ;;(initrd-modules '("dm-crypt" "virtio_pci" "virtio_balloon" "virtio_blk" "virtio_net"))
     69 (host-name "w96k-x200t")
    6670 (users
    6771  (cons*
     
    7276    (home-directory "/home/w96k")
    7377    (supplementary-groups
    74      '("wheel" "netdev" "audio" "video" "kvm" "docker")))
     78     '("wheel" "netdev" "audio" "video" "kvm")))
    7579   %base-user-accounts))
    7680 (packages
     
    7882   (map
    7983    specification->package
    80     '("module-init-tools"
    81       "xterm"
     84    '("xterm"
    8285      ;; Window Managers
    8386      "ratpoison"
    8487      "windowmaker"
    85       "emacs-exwm"
    86       "emacs-desktop-environment"     
     88      ;;"sawfish"
     89      ;;"emacs-exwm"
     90      ;;"emacs-desktop-environment"     
    8791      ;;; Stumpwm packages
    88       "stumpwm"
    89       "sbcl-stumpwm-ttf-fonts"
    90       "sbcl-stumpwm-winner-mode"
    91       "sbcl-stumpwm-wifi"
    92       "sbcl-stumpwm-swm-gaps"
    93       "sbcl-stumpwm-stumptray"
    94       "sbcl-stumpwm-screenshot"
    95       "sbcl-stumpwm-pass"
    96       "sbcl-stumpwm-net"
    97       "sbcl-stumpwm-stumptray"
    98       "sbcl-stumpwm-mem"
    99       "sbcl-stumpwm-kbd-layouts"
    100       "sbcl-stumpwm-globalwindows"
    101       "sbcl-stumpwm-cpu"
     92      ;; "stumpwm"
     93      ;; "sbcl-stumpwm-ttf-fonts"
     94      ;; "sbcl-stumpwm-winner-mode"
     95      ;; "sbcl-stumpwm-wifi"
     96      ;; "sbcl-stumpwm-swm-gaps"
     97      ;; "sbcl-stumpwm-stumptray"
     98      ;; "sbcl-stumpwm-screenshot"
     99      ;; "sbcl-stumpwm-pass"
     100      ;; "sbcl-stumpwm-net"
     101      ;; "sbcl-stumpwm-stumptray"
     102      ;; "sbcl-stumpwm-mem"
     103      ;; "sbcl-stumpwm-kbd-layouts"
     104      ;; "sbcl-stumpwm-globalwindows"
     105      ;; "sbcl-stumpwm-cpu"
    102106      ;;; Stumpwm packages end here
    103107      "nss-certs"
    104108      "font-dejavu"
    105       "font-bitstream-vera"
    106       "font-hack"
    107       "font-terminus"
    108       "font-fira-code"
    109       "font-fira-mono"
    110       "font-fira-sans"
    111       "font-jetbrains-mono"
    112       "sbcl"
     109      "font-gnu-unifont"
     110      "font-gnu-freefont"
     111      ;;"font-terminus"
    113112      "git"
    114113      "stow"
    115       "x86-energy-perf-policy"
    116       "powertop"
    117       "cpupower"
    118       "xf86-video-intel"
    119114      "lm-sensors"
    120       "msr-tools"
    121115      "xset"
    122116      "cpuid"))
    123    (list `(,stumpwm "lib"))
    124117   %base-packages))
    125 
     118 
    126119 (services
    127120  (cons*
    128    (service docker-service-type)
     121   ;;(service docker-service-type)
    129122   (service openssh-service-type)
    130123   (service tor-service-type)
    131124
    132125   ;;Wacom tablet support
    133    (service inputattach-service-type
    134             (inputattach-configuration
    135              (device "/dev/ttyS4")
    136              (device-type "wacom")))
     126   ;; (service inputattach-service-type
     127   ;;       (inputattach-configuration
     128   ;;        (device "/dev/ttyS4")
     129   ;;        (device-type "wacom")))
    137130   
    138    (service special-files-service-type
    139             `(("/bin/bash"   ,(file-append bash "/bin/bash"))
    140               ("/bin/python" ,(file-append python "/bin/python3"))
    141               ("/bin/awk" ,(file-append gawk "/usr/bin/awk"))
    142               ("/lib64/ld-linux-x86-64.so.2"
    143                ,(file-append (canonical-package glibc)
    144                              "/lib/ld-linux-x86-64.so.2"))))
     131   ;; (service special-files-service-type
     132   ;;       `(("/bin/bash"   ,(file-append bash "/bin/bash"))
     133   ;;         ("/bin/python" ,(file-append python "/bin/python3"))
     134   ;;         ("/bin/awk" ,(file-append gawk "/usr/bin/awk"))
     135   ;;         ("/usr/bin/awk" ,(file-append gawk "/usr/bin/awk"))
     136   ;;         ("/lib64/ld-linux-x86-64.so.2"
     137   ;;             ,(file-append (canonical-package glibc)
     138   ;;                           "/lib/ld-linux-x86-64.so.2"))))
    145139
    146140   (service nix-service-type)
  • shell/.inputrc

    rd8c64ac rbec93c6  
    99set colored-completion-prefix on
    1010set colored-stats on
    11 set completion-display-width 1
     11set completion-display-width -1
    1212set completion-ignore-case on
    1313set completion-map-case 0
  • wm/.ratpoisonrc

    rd8c64ac rbec93c6  
    88set framesels 1234567890abcdefg
    99
    10 set font "Fira Mono:size=10.5"
     10set font "DeJavu Sans Mono:size=12.5"
    1111set bargravity n
    1212defborder 0
     
    5555definekey top XF86AudioRaiseVolume exec amixer -q sset Master 3%+
    5656
    57 # Run on start
    58 workrave
    59 emacs
    60 icecat
     57exec wmname LG3D
  • wm/.stumpwmrc

    rd8c64ac rbec93c6  
    66(set-prefix-key (kbd "C-t"))
    77
    8 (require "ttf-fonts")
    9 (setf xft:*font-dirs* '("/run/current-system/profile/share/fonts/"))
    10 (setf
    11  clx-truetype:+font-cache-filename+
    12  (concat (getenv "HOME") "/.fonts/font-cache.sexp"))
    13 (xft:cache-fonts)
    14 (set-font (make-instance 'xft:font :family "Fira Sans"
    15                          :subfamily "Regular" :size 10.5))
     8;; (require "ttf-fonts")
     9;; (setf xft:*font-dirs* '("/run/current-system/profile/share/fonts/"))
     10;; (setf
     11;; clx-truetype:+font-cache-filename+
     12;; (concat (getenv "HOME") "/.fonts/font-cache.sexp"))
     13;; (xft:cache-fonts)
     14;; (set-font (make-instance 'xft:font :family "Fira Sans"
     15;;                       :subfamily "Regular" :size 10.5))
    1616
    1717;; Not available in guix yet
     
    6363(set-win-bg-color "#f2f2f2")
    6464
    65 (defcommand icecat () ()ppp
     65(defcommand icecat () ()
    6666            (run-or-raise "icecat" '(:class "IceCat")))
    6767
     
    102102
    103103;; Enable Mode-line
    104 (enable-mode-line (current-screen) (current-head) t)
     104;;(enable-mode-line (current-screen) (current-head) t)
    105105
    106106;; Gaps: useless concept to be honest
     
    110110;; (swm-gaps:toggle-gaps)
    111111
     112;; Show / Hide mode-line
     113(define-key *root-map* (kbd "M") "mode-line")
     114
    112115;; Old fix for scrolling gtk issue
    113116(setf (getenv "GDK_CORE_DEVICE_EVENTS") "1")
    114 
    115 (define-key *root-map* (kbd "q") "show-menu")
    116 
    117 ;; Show / Hide mode-line
    118 (define-key *root-map* (kbd "M") "mode-line")
Note: See TracChangeset for help on using the changeset viewer.