Initial backup

This commit is contained in:
2020-04-27 15:28:35 +02:00
parent 9b8c235753
commit be88ded986
34 changed files with 2161 additions and 0 deletions

113
.Xresources Normal file
View File

@@ -0,0 +1,113 @@
! URxvt settings {{{
URxvt.foreground: white
URxvt.background: black
URxvt.saveLine: 8192
! URxvt*font: xft:DejaVu Sans Mono:style=Book:pixelsize=12
! URxvt*boldFont: xft:DejaVu Sans Mono:style=Bold:pixelsize=12
! URxvt*italicFont: xft:DejaVu Sans Mono:style=Oblique:pixelsize=12
! URxvt*boldItalicFont: xft:DejaVu Sans Mono:style=BoldOblique:pixelsize=12
!URxvt*font: xft:Consolas for Powerline:regular:size=10
!URxvt*font: xft:Droid Sans Mono for Powerline:style=Regular:pixelsize=12
URxvt*font: xft:Inconsolata for Powerline:style=Medium:pixelsize=18
!URxvt*font: xft:Monaco for Powerline:regular:size=10
!URxvt*font: xft:Source Code Pro for Powerline:style=Medium,Regular:pixelsize=12
! URxvt*geometry: 80x27
! URxvt*chdir: /home/simon
! URxvt*termName: rxvt-256color
! URxvt*termName: rxvt-unicode
URxvt*depth: 32
! URxvt*inheritPixmap: true
! URxvt*transparent: true
! URxvt*tintColor: #2E3434
! URxvt*shading: 50
! fade text when focus is lost
! URxvt*fading: 25
! URxvt*fadecolor: #2E3434
URxvt*internalBorder: 5
URxvt*saveLines: 32767
URxvt*loginShell: true
URxvt*cutchars: "()*,<>[]{}|"
URxvt*visualBell: true
URxvt.urgentOnBell: true
! scrollbar style - rxvt (default), plain (most compact), next, or xterm
URxvt.scrollBar: false
URxvt.scrollBar_right: true
URxvt.scrollBar_floating: true
URxvt.scrollstyle: plain
URxvt.scrollTtyOutput: false
URxvt.scrollTtyKeypress: true
URxvt*secondaryScroll: true
! URxvt*perl-lib: /usr/lib/urxvt/perl/
! URxvt.perl-lib: .urxvt/
! perl-ext-common remplacé par perl-ext depuis v9.16 :
URxvt.perl-ext: default,matcher,searchable-scrollback,clipboard,url-select,keyboard-select
! urlLauncher remplacé par url-launcher depuis v9.16 :
URxvt.url-launcher: firefox
! URxvt*urlLauncher: firefox
! URxvt.urlLauncher: x-www-browser
URxvt*matcher.button: 1
! URxvt*matcher.pattern.1: \\bwww\\.[\\w-]+\\.[\\w./?&@#-]*[\\w/-]
! Rxvt*matcher.pattern.1: \\b(gopher|mailto|http|https|ftp|file):[/]*[\\w-]\\.[\\w./?&@#-]*[\\w/-]
! Rxvt*matcher.pattern.2: \\bwww\\.[\\w-]\\.[\\w./?&@#-]*[\\w/-]
URxvt*keysym.C-u: perl:matcher
! open and list recent (currently limited to 10) URLs via keyboard:
URxvt.keysym.C-Delete: perl:matcher:last
URxvt.keysym.M-Delete: perl:matcher:list
! url-select
! Alt+U Enter selection mode. The last URL on your screen will be
! selected. You can repeat Alt+U to select the next upward URL.
! J/K Select next upward URL
! Return Open selected URL in browser and quit selection mode
! O Open selected URL in browser without quitting selection mode
! Y Copy (yank) selected URL and quit selection mode
! Esc Cancel URL selection mode
URxvt.url-select.launcher: /usr/bin/firefox -new-tab
URxvt.url-select.underline: true
URxvt.keysym.M-u: perl:url-select:select_next
URxvt.keysym.M-Escape: perl:keyboard-select:activate
URxvt.keysym.M-s: perl:keyboard-select:search
URxvt*colorUL: #c5f779
URxvt*underlineColor: #c5f779
URxvt.colorBD: #ffffff
URxvt.colorIT: #bbbbbb
URxvt*cursorUnderline: false
! URxvt.cursorColor: #ffbb00
! URxvt.borderColor: #191919
! urxvt*.colorUL: #ffffff
! URxvt.keysym.M-C-KP_0: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=12\007
! URxvt.keysym.M-C-KP_1: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=14\007
! URxvt.keysym.M-C-KP_2: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=16\007
! URxvt.keysym.M-C-KP_3: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=20\007
! URxvt.keysym.M-C-KP_4: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=24\007
! URxvt.keysym.M-C-KP_5: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=32\007
! URxvt.keysym.M-C-KP_6: command:\033]710;xft: Deja Vu Sans Mono:pixelsize=48\007
! URxvt.tabbed.tabbar-fg: <colour-index, default 3>
! URxvt.tabbed.tabbar-bg: <colour-index, default 0>
! URxvt.tabbed.tab-fg: <colour-index, default 0>
! URxvt.tabbed.tab-bg: <colour-index, default 1>
!}}}

38
.vimrc Normal file
View File

@@ -0,0 +1,38 @@
set nocompatible
set expandtab
filetype plugin indent on
set tabstop=8
set shiftwidth=4
set expandtab
syntax on
python3 from powerline.vim import setup as powerline_setup
python3 powerline_setup()
python3 del powerline_setup
set laststatus=2 " Always display the statusline in all windows
set showtabline=2 " Always display the tabline, even if there is only one tab
set noshowmode " Hide the default mode text (e.g. -- INSERT -- below the statusline)
set t_Co=256
map <F2> :NERDTreeToggle <CR>
map <F3> :TagbarToggle <CR>
set number
" CursorLines
set cursorline
hi CursorLine cterm=NONE ctermbg=darkgrey ctermfg=lightgrey
hi CursorLineNR cterm=bold
"hi clear CursorLine
"augroup CLClear
" autocmd! ColorScheme * hi clear CursorLine
"augroup END
"hi CursorLineNR cterm=bold
"augroup CLNRSet
" autocmd! ColorScheme * hi CursorLineNR cterm=bold
"augroup END

8
.xmonad/.conky_dzen Normal file
View File

@@ -0,0 +1,8 @@
background yes
out_to_console yes
out_to_x no
# Update interval in seconds
update_interval 1
TEXT
^i(/home/my_user/.xmonad/dzen2/cpu.xbm) ^fg(\#FFFFFF)${cpu}% ^i(/home/my_user/.xmonad/dzen2/mem.xbm) ^fg(\#FFFFFF)${memperc}% ^fg(\#ebac54) ${if_existing /proc/net/route eth1} ^i(/home/my_user/.xmonad/dzen2/net_wired.xbm) ^fg(\#00aa4a) ^i(/home/my_user/.xmonad/dzen2/net_down_03.xbm)${downspeed eth1} ^fg(\#ff3333) ^i(/home/my_user/.xmonad/dzen2/net_up_03.xbm)${upspeed eth1} ^fg(\#ebac54) ^i(/home/my_user/.xmonad/dzen2/mpd.xbm) ^fg(\#00ffff)${exec rhythmbox-client --print-playing-format "%aa-%at-%tt" | cut -c-70} ^fg(\#ebac54) ^i(/home/my_user/.xmonad/dzen2/volume.xbm) ^fg(\#00ffff)${exec amixer get Headphone | egrep -o "[0-9]+%" | head -1 | egrep -o "[0-9]*"}% ^fg(\#ebac54) ^i(/home/my_user/.xmonad/dzen2/clock.xbm) ^fg(\#FFFFFF) ${time %d %m %Y} ^fg(\#ebac54) ${time %R}

1
.xmonad/fix.sh Executable file
View File

@@ -0,0 +1 @@
ghc --make xmonad.hs -i -ilib -dynamic -fforce-recomp -main-is main -v -o xmonad-x86_64-linux

1
.xmonad/nano.save Normal file
View File

@@ -0,0 +1 @@
123

149
.xmonad/pkg_list.txt Normal file
View File

@@ -0,0 +1,149 @@
haskell-adjunctions
haskell-aeson
haskell-alsa-core
haskell-alsa-mixer
haskell-ansi-terminal
haskell-ansi-wl-pprint
haskell-asn1-encoding
haskell-asn1-parse
haskell-asn1-types
haskell-async
haskell-attoparsec
haskell-base-compat
haskell-base-orphans
haskell-base-prelude
haskell-base16-bytestring
haskell-base64-bytestring
haskell-basement
haskell-bifunctors
haskell-binary-conduit
haskell-blaze-builder
haskell-blaze-html
haskell-blaze-markup
haskell-byteable
haskell-bz2
haskell-bzlib
haskell-call-stack
haskell-case-insensitive
haskell-cereal
haskell-colour
haskell-comonad
haskell-conduit
haskell-conduit-extra
haskell-connection
haskell-contravariant
haskell-cookie
haskell-crypto-cipher-types
haskell-crypto-numbers
haskell-crypto-pubkey
haskell-crypto-pubkey-types
haskell-crypto-random
haskell-cryptohash
haskell-cryptonite
haskell-data-default
haskell-data-default-class
haskell-data-default-instances-containers
haskell-data-default-instances-dlist
haskell-data-default-instances-old-locale
haskell-dbus
haskell-distributive
haskell-dlist
haskell-errors
haskell-exceptions
haskell-extensible-exceptions
haskell-fgl
haskell-free
haskell-generic-data
haskell-graphviz
haskell-hashable
haskell-hinotify
haskell-hopenpgp
haskell-hourglass
haskell-http
haskell-http-client
haskell-http-client-tls
haskell-http-conduit
haskell-http-types
haskell-incremental-parser
haskell-integer-logarithms
haskell-invariant
haskell-iwlib
haskell-ixset-typed
haskell-kan-extensions
haskell-lens
haskell-libmpd
haskell-libyaml
haskell-memory
haskell-mime-types
haskell-monad-loops
haskell-mono-traversable
haskell-monoid-subclasses
haskell-nettle
haskell-network
haskell-network-uri
haskell-newtype
haskell-old-locale
haskell-old-time
haskell-openpgp-asciiarmor
haskell-optparse-applicative
haskell-parallel
haskell-parsec-numbers
haskell-pem
haskell-polyparse
haskell-prettyprinter
haskell-prettyprinter-ansi-terminal
haskell-prettyprinter-convert-ansi-wl-pprint
haskell-primes
haskell-primitive
haskell-profunctors
haskell-random
haskell-reflection
haskell-regex-base
haskell-regex-compat
haskell-regex-posix
haskell-resourcet
haskell-safe
haskell-safe-exceptions
haskell-safecopy
haskell-scientific
haskell-securemem
haskell-semigroupoids
haskell-setlocale
haskell-show-combinators
haskell-socks
haskell-split
haskell-statevar
haskell-streaming-commons
haskell-syb
haskell-tagged
haskell-temporary
haskell-th-abstraction
haskell-th-lift
haskell-time-compat
haskell-time-locale-compat
haskell-timezone-olson
haskell-timezone-series
haskell-tls
haskell-transformers-base
haskell-transformers-compat
haskell-type-equality
haskell-typed-process
haskell-unliftio-core
haskell-unordered-containers
haskell-utf8-string
haskell-uuid-types
haskell-vector
haskell-vector-algorithms
haskell-void
haskell-wl-pprint-extras
haskell-wl-pprint-text
haskell-x11
haskell-x11-xft
haskell-x509
haskell-x509-store
haskell-x509-system
haskell-x509-validation
haskell-xml-conduit
haskell-xml-types
haskell-yaml
haskell-zlib

1
.xmonad/prompt-history Normal file
View File

@@ -0,0 +1 @@
fromList [("Run: ",["firefox"])]

Binary file not shown.

3
.xmonad/scripts/getVolume.sh Executable file
View File

@@ -0,0 +1,3 @@
#!/bin/bash
amixer get Master |grep % |awk '{print $5, $6}' | head -1

7
.xmonad/scripts/getdGPULoad.py Executable file
View File

@@ -0,0 +1,7 @@
#!/usr/bin/python3
from pynvml import *
nvmlInit()
handle = nvmlDeviceGetHandleByIndex(0)
print(str(nvmlDeviceGetUtilizationRates(handle).gpu))

View File

@@ -0,0 +1,10 @@
#!/bin/bash
STATE="$(cat /proc/acpi/bbswitch | grep -o "ON\|OFF")"
if [ "$STATE" == "ON" ];
then
LOAD="$(~/.xmonad/scripts/getdGPULoad.py)"
echo "${STATE} (${LOAD}%)"
else
echo "OFF"
fi

3
.xmonad/scripts/wallpaper.sh Executable file
View File

@@ -0,0 +1,3 @@
#!/bin/bash
DISPLAY=:0 /usr/bin/feh --recursive --randomize --bg-fill /home/marius/ownCloud/Wallpaper

7
.xmonad/xmobar.errors Normal file
View File

@@ -0,0 +1,7 @@
xmobar.hs:1:1: error:
Parse error: module header, import declaration
or top-level declaration expected.
|
1 | Config {
| ^^^^^^^^^...

102
.xmonad/xmobar.hs Normal file
View File

@@ -0,0 +1,102 @@
Config {
-- appearance
font = "xft:Bitstream Vera Sans Mono:size=9:bold:antialias=true"
, bgColor = "black"
, fgColor = "#646464"
, position = TopW L 90
, border = BottomB
, borderColor = "#646464"
-- layout
, sepChar = "%" -- delineator between plugin names and straight text
, alignSep = "}{" -- separator between left-right alignment
, template = "%StdinReader% }{ %battery% | %multicpu% | %coretemp% | %memory% | %dynnetwork% | Vol: %getVolume% | dGPU: %getdGPUStatus% | %date% "
-- general behavior
, lowerOnStart = True -- send to bottom of window stack on start
, hideOnStart = False -- start with window unmapped (hidden)
, allDesktops = True -- show on all desktops
, overrideRedirect = True -- set the Override Redirect flag (Xlib)
, pickBroadest = False -- choose widest display (multi-monitor)
, persistent = True -- enable/disable hiding (True = disabled)
-- plugins
-- Numbers can be automatically colored according to their value. xmobar
-- decides color based on a three-tier/two-cutoff system, controlled by
-- command options:
-- --Low sets the low cutoff
-- --High sets the high cutoff
--
-- --low sets the color below --Low cutoff
-- --normal sets the color between --Low and --High cutoffs
-- --High sets the color above --High cutoff
--
-- The --template option controls how the plugin is displayed. Text
-- color can be set by enclosing in <fc></fc> tags. For more details
-- see http://projects.haskell.org/xmobar/#system-monitor-plugins.
, commands =
-- network activity monitor (dynamic interface resolution)
[ Run DynNetwork [ "--template" , "<dev>: <tx>kB/s|<rx>kB/s"
, "--Low" , "1000" -- units: B/s
, "--High" , "5000" -- units: B/s
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- cpu activity monitor
, Run MultiCpu [ "--template" , "CPU: <total>%"
, "--Low" , "50" -- units: %
, "--High" , "85" -- units: %
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- cpu core temperature monitor
, Run CoreTemp [ "--template" , "Temp: <core0>°C|<core1>°C|<core2>°C|<core3>°C"
, "--Low" , "70" -- units: °C
, "--High" , "80" -- units: °C
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 50
-- memory usage monitor
, Run Memory [ "--template" ,"Mem: <usedratio>%"
, "--Low" , "45" -- units: %
, "--High" , "90" -- units: %
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- battery monitor
, Run Battery [ "--template" , "Batt: <acstatus>"
, "--Low" , "10" -- units: %
, "--High" , "80" -- units: %
, "--low" , "darkred"
, "--normal" , "darkorange"
, "--high" , "darkgreen"
, "--" -- battery specific options
-- discharging status
, "-o" , "<left>% (<timeleft>)"
-- AC "on" status
, "-O" , "<fc=#dAA520>Charging (<left>%)</fc>"
-- charged status
, "-i" , "<fc=#006000>Charged</fc>"
] 50
-- time and date indicator
-- (%F = y-m-d date, %a = day of week, %T = h:m:s time)
, Run Date "<fc=#ABABAB>%F (%a) %T</fc>" "date" 10
, Run StdinReader
, Run Com "/home/marius/.xmonad/scripts/getVolume.sh" [] "getVolume" 10
, Run Com "/home/marius/.xmonad/scripts/getdGPUStatus.sh" [] "getdGPUStatus" 10
]
}

106
.xmonad/xmobar.hs.bak2 Normal file
View File

@@ -0,0 +1,106 @@
Config {
-- appearance
font = "xft:Bitstream Vera Sans Mono:size=9:bold:antialias=true"
, bgColor = "black"
, fgColor = "#646464"
, position = TopW L 90
, border = BottomB
, borderColor = "#646464"
-- layout
, sepChar = "%" -- delineator between plugin names and straight text
, alignSep = "}{" -- separator between left-right alignment
, template = "%StdinReader% }{ %battery% | %multicpu% | %coretemp% | %memory% | %dynnetwork% | Vol: %getVolume% | dGPU: %getdGPUStatus% | %date% "
-- general behavior
, lowerOnStart = True -- send to bottom of window stack on start
, hideOnStart = False -- start with window unmapped (hidden)
, allDesktops = True -- show on all desktops
, overrideRedirect = True -- set the Override Redirect flag (Xlib)
, pickBroadest = False -- choose widest display (multi-monitor)
, persistent = True -- enable/disable hiding (True = disabled)
-- plugins
-- Numbers can be automatically colored according to their value. xmobar
-- decides color based on a three-tier/two-cutoff system, controlled by
-- command options:
-- --Low sets the low cutoff
-- --High sets the high cutoff
--
-- --low sets the color below --Low cutoff
-- --normal sets the color between --Low and --High cutoffs
-- --High sets the color above --High cutoff
--
-- The --template option controls how the plugin is displayed. Text
-- color can be set by enclosing in <fc></fc> tags. For more details
-- see http://projects.haskell.org/xmobar/#system-monitor-plugins.
, commands =
-- weather monitor
[ Run Weather "EDDL" [ "--template", "<skyCondition> | <fc=#4682B4><tempC></fc>°C | <fc=#4682B4><rh></fc>% | <fc=#4682B4><pressure></fc>hPa"
] 36000
-- network activity monitor (dynamic interface resolution)
, Run DynNetwork [ "--template" , "<dev>: <tx>kB/s|<rx>kB/s"
, "--Low" , "1000" -- units: B/s
, "--High" , "5000" -- units: B/s
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- cpu activity monitor
, Run MultiCpu [ "--template" , "CPU: <total>%"
, "--Low" , "50" -- units: %
, "--High" , "85" -- units: %
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- cpu core temperature monitor
, Run CoreTemp [ "--template" , "Temp: <core0>°C|<core1>°C|<core2>°C|<core3>°C"
, "--Low" , "70" -- units: °C
, "--High" , "80" -- units: °C
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 50
-- memory usage monitor
, Run Memory [ "--template" ,"Mem: <usedratio>%"
, "--Low" , "45" -- units: %
, "--High" , "90" -- units: %
, "--low" , "darkgreen"
, "--normal" , "darkorange"
, "--high" , "darkred"
] 10
-- battery monitor
, Run Battery [ "--template" , "Batt: <acstatus>"
, "--Low" , "10" -- units: %
, "--High" , "80" -- units: %
, "--low" , "darkred"
, "--normal" , "darkorange"
, "--high" , "darkgreen"
, "--" -- battery specific options
-- discharging status
, "-o" , "<left>% (<timeleft>)"
-- AC "on" status
, "-O" , "<fc=#dAA520>Charging (<left>%)</fc>"
-- charged status
, "-i" , "<fc=#006000>Charged</fc>"
] 50
-- time and date indicator
-- (%F = y-m-d date, %a = day of week, %T = h:m:s time)
, Run Date "<fc=#ABABAB>%F (%a) %T</fc>" "date" 10
, Run StdinReader
, Run Com "/home/marius/.xmonad/scripts/getVolume.sh" [] "getVolume" 10
, Run Com "/home/marius/.xmonad/scripts/getdGPUStatus.sh" [] "getdGPUStatus" 10
]
}

34
.xmonad/xmonad-session-rc Executable file
View File

@@ -0,0 +1,34 @@
#!/bin/sh
# Script to configure X, start common apps, and start xmonad.
# Author: Vic Fryzel
# http://github.com/vicfryzel/xmonad-config
# Configure PATH so that we can access our scripts below
PATH=$PATH:~/.cabal/bin:~/.xmonad/bin
# Configure X
xsetroot -cursor_name left_ptr &
xrdb -merge ~/.Xdefaults &
setxkbmap -option "ctrl:nocaps" &
# Start a window compositor. This ensures Google Chrome paints correctly.
xcompmgr -n &
# Start the system tray
tray &
# Start two terminals
gnome-terminal &
gnome-terminal &
# Start a browser
google-chrome &
# Start screensaver
gnome-screensaver &
# Start sound server
pulseaudio --start --log-target=syslog &
gnome-session &

BIN
.xmonad/xmonad-x86_64-linux Executable file

Binary file not shown.

BIN
.xmonad/xmonad-x86_64-linux.bak Executable file

Binary file not shown.

23
.xmonad/xmonad.errors Normal file
View File

@@ -0,0 +1,23 @@
xmonad.hs:27:1: warning: [-Wtabs]
Tab character found here, and in 130 further locations.
Please use spaces instead.
|
27 | manageDocks
| ^^^^^^^^
xmonad.hs:141:14: warning: [-Wdeprecations]
In the use of defaultConfig
(imported from XMonad, but defined in XMonad.Config):
Deprecated: "Use def (from Data.Default, and re-exported by XMonad and XMonad.Config) instead."
|
141 | xmonad $ defaultConfig
| ^^^^^^^^^^^^^
xmonad.hs:149:45: warning: [-Wdeprecations]
In the use of defaultConfig
(imported from XMonad, but defined in XMonad.Config):
Deprecated: "Use def (from Data.Default, and re-exported by XMonad and XMonad.Config) instead."
|
149 | , handleEventHook defaultConfig ]
| ^^^^^^^^^^^^^

BIN
.xmonad/xmonad.hi Normal file

Binary file not shown.

174
.xmonad/xmonad.hs Normal file
View File

@@ -0,0 +1,174 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Hooks.SetWMName
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import XMonad.Util.NamedScratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Pinentry" --> doFloat
, className =? "GameClient.exe" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> namedScratchpadManageHook myScratchPads
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myScratchPads = [ NS "mixer" spawnMixer findMixer manageMixer
, NS "terminal" spawnTerm findTerm manageTerm
, NS "bitwarden" spawnBitwarden findBitwarden manageBitwarden
, NS "quicknote" spawnQuicknote findQuicknote manageQuicknote
]
where
spawnMixer = "pavucontrol"
findMixer = className =? "Pavucontrol"
manageMixer = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- height, 60%
w = 0.6 -- width, 60%
t = (1 - h)/2 -- centered top/bottom
l = (1 - w)/2 -- centered left/right
spawnTerm = myTerminal ++ " -name scratchpad"
findTerm = resource =? "scratchpad"
manageTerm = customFloating $ W.RationalRect l t w h
where
h = 0.4 -- terminal height, 20%
w = 0.7 -- terminal width, 70%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnQuicknote = myTerminal ++ " -name quicknote -e notology -q"
findQuicknote = resource =? "quicknote"
manageQuicknote = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- terminal height, 60%
w = 0.6 -- terminal width, 60%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnBitwarden = "bitwarden-bin"
findBitwarden = resource =? "bitwarden"
manageBitwarden = customFloating $ W.RationalRect l t w h
where
h = 0.8 -- terminal height, 80%
w = 0.5 -- terminal width, 50%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, startupHook = setWMName "LG3D"
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminator -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminator")
, ((mod4Mask .|. shiftMask, xK_t), namedScratchpadAction myScratchPads "terminal")
, ((mod4Mask .|. shiftMask, xK_m), namedScratchpadAction myScratchPads "mixer")
, ((mod4Mask .|. shiftMask, xK_n), namedScratchpadAction myScratchPads "quicknote")
, ((mod4Mask .|. shiftMask, xK_b), namedScratchpadAction myScratchPads "bitwarden")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008ff4a), spawn "xset dpms force off")
, ((0 , 0x1008ffb2), spawn "amixer set Capture toggle")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

31
.xmonad/xmonad.hs.bak Normal file
View File

@@ -0,0 +1,31 @@
import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook = composeAll
[ className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
]
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = manageDocks <+> myManageHook -- make sure to include myManageHook definition from above
<+> manageHook defaultConfig
, layoutHook = avoidStruts $ layoutHook defaultConfig
, handleEventHook = mconcat
[ docksEventHook
, handleEventHook defaultConfig ]
, logHook = dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "green" "" . shorten 50
}
, modMask = mod4Mask -- Rebind Mod to the Windows key
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_z), spawn "xscreensaver-command -lock")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

85
.xmonad/xmonad.hs.bak2 Normal file
View File

@@ -0,0 +1,85 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook = manageDocks <+> manageSpawn <+> composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
]
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "terminology"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

99
.xmonad/xmonad.hs.bak3 Normal file
View File

@@ -0,0 +1,99 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook = manageDocks <+> manageSpawn <+> manageScratchPad <+> composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
]
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.1 -- terminal height, 10%
w = 1 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = 1 - w -- distance from left edge, 0%
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), scratchpadSpawnActionTerminal myTerminal)
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

109
.xmonad/xmonad.hs.bak4 Normal file
View File

@@ -0,0 +1,109 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> manageScratchPad
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), scratchpadSpawnActionTerminal myTerminal)
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

155
.xmonad/xmonad.hs.bak5 Normal file
View File

@@ -0,0 +1,155 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import XMonad.Util.NamedScratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> namedScratchpadManageHook myScratchPads
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myScratchPads = [ NS "mixer" spawnMixer findMixer manageMixer
, NS "terminal" spawnTerm findTerm manageTerm
, NS "notebook" spawnNotebook findNotebook manageNotebook
]
where
spawnMixer = "pavucontrol"
findMixer = className =? "Pavucontrol"
manageMixer = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- height, 60%
w = 0.6 -- width, 60%
t = (1 - h)/2 -- centered top/bottom
l = (1 - w)/2 -- centered left/right
spawnTerm = myTerminal ++ " -name scratchpad"
findTerm = resource =? "scratchpad"
manageTerm = customFloating $ W.RationalRect l t w h
where
h = 0.4 -- terminal height, 20%
w = 0.7 -- terminal width, 70%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnNotebook = myTerminal ++ " -name notebook -e notology -q"
findNotebook = resource =? "notebook"
manageNotebook = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- terminal height, 60%
w = 0.6 -- terminal width, 60%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), namedScratchpadAction myScratchPads "terminal")
, ((mod4Mask .|. shiftMask, xK_m), namedScratchpadAction myScratchPads "mixer")
, ((mod4Mask .|. shiftMask, xK_n), namedScratchpadAction myScratchPads "notebook")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

170
.xmonad/xmonad.hs.bak6 Normal file
View File

@@ -0,0 +1,170 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import XMonad.Util.NamedScratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Pinentry" --> doFloat
, className =? "GameClient.exe" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> namedScratchpadManageHook myScratchPads
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myScratchPads = [ NS "mixer" spawnMixer findMixer manageMixer
, NS "terminal" spawnTerm findTerm manageTerm
, NS "notebook" spawnNotebook findNotebook manageNotebook
, NS "quicknote" spawnQuicknote findQuicknote manageQuicknote
]
where
spawnMixer = "pavucontrol"
findMixer = className =? "Pavucontrol"
manageMixer = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- height, 60%
w = 0.6 -- width, 60%
t = (1 - h)/2 -- centered top/bottom
l = (1 - w)/2 -- centered left/right
spawnTerm = myTerminal ++ " -name scratchpad"
findTerm = resource =? "scratchpad"
manageTerm = customFloating $ W.RationalRect l t w h
where
h = 0.4 -- terminal height, 20%
w = 0.7 -- terminal width, 70%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnQuicknote = myTerminal ++ " -name quicknote -e notology -q"
findQuicknote = resource =? "quicknote"
manageQuicknote = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- terminal height, 60%
w = 0.6 -- terminal width, 60%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnNotebook = myTerminal ++ " -name notebook -e notology"
findNotebook = resource =? "notebook"
manageNotebook = customFloating $ W.RationalRect l t w h
where
h = 0.8 -- terminal height, 80%
w = 0.5 -- terminal width, 50%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), namedScratchpadAction myScratchPads "terminal")
, ((mod4Mask .|. shiftMask, xK_m), namedScratchpadAction myScratchPads "mixer")
, ((mod4Mask .|. shiftMask, xK_n), namedScratchpadAction myScratchPads "quicknote")
, ((mod4Mask .|. shiftMask, xK_b), namedScratchpadAction myScratchPads "notebook")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

172
.xmonad/xmonad.hs.bak7 Normal file
View File

@@ -0,0 +1,172 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Hooks.SetWMName
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import XMonad.Util.NamedScratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Pinentry" --> doFloat
, className =? "GameClient.exe" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> namedScratchpadManageHook myScratchPads
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myScratchPads = [ NS "mixer" spawnMixer findMixer manageMixer
, NS "terminal" spawnTerm findTerm manageTerm
, NS "notebook" spawnNotebook findNotebook manageNotebook
, NS "quicknote" spawnQuicknote findQuicknote manageQuicknote
]
where
spawnMixer = "pavucontrol"
findMixer = className =? "Pavucontrol"
manageMixer = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- height, 60%
w = 0.6 -- width, 60%
t = (1 - h)/2 -- centered top/bottom
l = (1 - w)/2 -- centered left/right
spawnTerm = myTerminal ++ " -name scratchpad"
findTerm = resource =? "scratchpad"
manageTerm = customFloating $ W.RationalRect l t w h
where
h = 0.4 -- terminal height, 20%
w = 0.7 -- terminal width, 70%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnQuicknote = myTerminal ++ " -name quicknote -e notology -q"
findQuicknote = resource =? "quicknote"
manageQuicknote = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- terminal height, 60%
w = 0.6 -- terminal width, 60%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnNotebook = myTerminal ++ " -name notebook -e notology"
findNotebook = resource =? "notebook"
manageNotebook = customFloating $ W.RationalRect l t w h
where
h = 0.8 -- terminal height, 80%
w = 0.5 -- terminal width, 50%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, startupHook = setWMName "LG3D"
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), namedScratchpadAction myScratchPads "terminal")
, ((mod4Mask .|. shiftMask, xK_m), namedScratchpadAction myScratchPads "mixer")
, ((mod4Mask .|. shiftMask, xK_n), namedScratchpadAction myScratchPads "quicknote")
, ((mod4Mask .|. shiftMask, xK_b), namedScratchpadAction myScratchPads "notebook")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

173
.xmonad/xmonad.hs.bak8 Normal file
View File

@@ -0,0 +1,173 @@
import XMonad
import XMonad.Actions.SpawnOn
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.FadeInactive
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops(fullscreenEventHook,ewmh)
import XMonad.Hooks.SetWMName
import XMonad.Layout.Grid
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutHints
import XMonad.Layout.Cross
import XMonad.Layout.ToggleLayouts
import XMonad.Layout.WindowNavigation
import XMonad.Layout.NoBorders
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.Scratchpad
import XMonad.Util.NamedScratchpad
import qualified XMonad.StackSet as W
-- import qualified XMonad.StackSet as S
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
myManageHook =
manageDocks
<+> manageSpawn
<+>
(composeAll [ isFullscreen --> doFullFloat
, className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
, className =? "PrisonArchitect.x86_64" --> doFullFloat
, className =? "hl_linux" --> doFloat
, className =? "hl2_linux" --> doFloat
, className =? "chromium" --> doFloat
, className =? "Pinentry" --> doFloat
, className =? "GameClient.exe" --> doFloat
, className =? "Gajim" --> doShift "ι"
, className =? "Thunderbird" --> doShift "θ"
])
<+> namedScratchpadManageHook myScratchPads
manageScratchPad :: ManageHook
manageScratchPad = scratchpadManageHook (W.RationalRect l t w h)
where
h = 0.2 -- terminal height, 10%
w = 0.7 -- terminal width, 100%
t = 1 - h -- distance from top edge, 90%
l = (1 - w)/2 -- distance from left edge, 0%
myScratchPads = [ NS "mixer" spawnMixer findMixer manageMixer
, NS "terminal" spawnTerm findTerm manageTerm
, NS "notebook" spawnNotebook findNotebook manageNotebook
, NS "quicknote" spawnQuicknote findQuicknote manageQuicknote
]
where
spawnMixer = "pavucontrol"
findMixer = className =? "Pavucontrol"
manageMixer = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- height, 60%
w = 0.6 -- width, 60%
t = (1 - h)/2 -- centered top/bottom
l = (1 - w)/2 -- centered left/right
spawnTerm = myTerminal ++ " -name scratchpad"
findTerm = resource =? "scratchpad"
manageTerm = customFloating $ W.RationalRect l t w h
where
h = 0.4 -- terminal height, 20%
w = 0.7 -- terminal width, 70%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnQuicknote = myTerminal ++ " -name quicknote -e notology -q"
findQuicknote = resource =? "quicknote"
manageQuicknote = customFloating $ W.RationalRect l t w h
where
h = 0.6 -- terminal height, 60%
w = 0.6 -- terminal width, 60%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
spawnNotebook = myTerminal ++ " -name notebook -e notology"
findNotebook = resource =? "notebook"
manageNotebook = customFloating $ W.RationalRect l t w h
where
h = 0.8 -- terminal height, 80%
w = 0.5 -- terminal width, 50%
t = 1 - h -- distance from top edge
l = (1 - w)/2 -- distance from left edge
myWorkspaces = ["α","β","γ","δ","ε","ζ","η","θ","ι"]
myLogHook xmproc = do
fadeInactiveLogHook 0.8
<+> dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "#01b8e0" "" . shorten 50
}
myTerminal = "urxvt"
myLayout = tiled ||| Mirror tiled ||| Full ||| Grid where
-- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio
-- The default number of windows in the master pane
nmaster = 1
-- Default proportion of screen occupied by master pane
ratio = 1/2
-- Percent of screen to increment by when resizing panes
delta = 2/100
main = do
xmproc <- spawnPipe "xmobar ~/.xmonad/xmobar.hs"
xmonad $ defaultConfig
{ manageHook = myManageHook -- make sure to include myManageHook definition from above
-- <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayout
, startupHook = setWMName "LG3D"
, handleEventHook = mconcat
[ docksEventHook
, fullscreenEventHook
, handleEventHook defaultConfig ]
, logHook = myLogHook xmproc
, modMask = mod4Mask -- Rebind Mod to the Windows key
, terminal = myTerminal
, workspaces = myWorkspaces
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_l), spawn "xscreensaver-command -lock")
, ((mod4Mask .|. shiftMask, xK_r), spawn "terminology -e ranger")
, ((mod4Mask .|. shiftMask, xK_f), spawn "firefox")
, ((mod4Mask .|. shiftMask, xK_Return), spawn "terminology")
, ((mod4Mask .|. shiftMask, xK_t), namedScratchpadAction myScratchPads "terminal")
, ((mod4Mask .|. shiftMask, xK_m), namedScratchpadAction myScratchPads "mixer")
, ((mod4Mask .|. shiftMask, xK_n), namedScratchpadAction myScratchPads "quicknote")
, ((mod4Mask .|. shiftMask, xK_b), namedScratchpadAction myScratchPads "notebook")
, ((mod4Mask , xK_q), spawn "killall xmobar; xmonad --recompile; xmonad --restart")
, ((0 , 0x1008FF11), spawn "amixer -q sset Master 2%-")
, ((0 , 0x1008FF13), spawn "amixer -q sset Master 2%+")
, ((0 , 0x1008ffb2), spawn "amixer set Capture toggle")
, ((0 , 0x1008FF12), spawn "amixer set Master toggle")
, ((0 , 0x1008FF03), spawn "xbacklight -dec 5")
, ((0 , 0x1008FF02), spawn "xbacklight -inc 5")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

56
.xmonad/xmonad.hs.test Normal file
View File

@@ -0,0 +1,56 @@
import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
-- Font
myFont = "-*-terminus-*-*-*-*-12-*-*-*-*-*-iso8859-*"
-- Colors
myBgBgColor = "black"
myFgColor = "gray80"
myBgColor = "gray20"
-- Dzen2 stuff
-----------------
--
myDzenGenOpts = "-fg '" ++ myFgColor ++ "' -bg '" ++ myBgColor ++ "' -fn '" ++ myFont ++ "' -h '16'"
-- Status Bar
myStatusBar = "dzen2 -w 665 -ta l " ++ myDzenGenOpts
-- Conky Bar
myConkyBar = "conky -c ~/.conky_bar | dzen2 -x 660 -w 365 " ++ myDzenGenOpts
myManageHook = composeAll
[ className =? "Gimp" --> doFloat
, className =? "Vncviewer" --> doFloat
]
main = do
myStatusBarPipe <- spawnPipe myStatusBar
xmproc <- spawnPipe myConkyBar
xmonad $ defaultConfig
{ manageHook = manageDocks <+> myManageHook -- make sure to include myManageHook definition from above
<+> manageHook defaultConfig
, layoutHook = avoidStruts $ layoutHook defaultConfig
, handleEventHook = mconcat
[ docksEventHook
, handleEventHook defaultConfig ]
, logHook = dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "green" "" . shorten 50
}
, modMask = mod4Mask -- Rebind Mod to the Windows key
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_z), spawn "xscreensaver-command -lock")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
]

BIN
.xmonad/xmonad.o Normal file

Binary file not shown.

1
.xmonad/xmonad.state.bak Normal file
View File

@@ -0,0 +1 @@
StateFile {sfWins = StackSet {current = Screen {workspace = Workspace {tag = "1", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Just (Stack {focus = 29360144, up = [44040194,48234498,50331650,37748738], down = []})}, screen = S 1, screenDetail = SD {screenRect = Rectangle {rect_x = 0, rect_y = 0, rect_width = 1440, rect_height = 900}}}, visible = [Screen {workspace = Workspace {tag = "2", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Just (Stack {focus = 10485763, up = [], down = []})}, screen = S 0, screenDetail = SD {screenRect = Rectangle {rect_x = 1440, rect_y = 0, rect_width = 1920, rect_height = 1080}}}], hidden = [Workspace {tag = "3", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Just (Stack {focus = 39845890, up = [], down = []})},Workspace {tag = "4", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Just (Stack {focus = 41943042, up = [], down = []})},Workspace {tag = "5", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Just (Stack {focus = 12582928, up = [], down = [18874396]})},Workspace {tag = "6", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Nothing},Workspace {tag = "7", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Nothing},Workspace {tag = "8", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Nothing},Workspace {tag = "9", layout = "Choose L (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2}) (Choose L (Mirror (Tall {tallNMaster = 1, tallRatioIncrement = 3 % 100, tallRatio = 1 % 2})) Full)", stack = Nothing}], floating = fromList [(10485763,RationalRect (3 % 20) (0 % 1) (3 % 40) (1 % 72)),(29360144,RationalRect (0 % 1) (19 % 900) (1921 % 1440) (59 % 50))]}, sfExt = [("Urgents","Urgents {fromUrgents = []}"),("[Reminder]","[]")]}

284
.xscreensaver Normal file
View File

@@ -0,0 +1,284 @@
# XScreenSaver Preferences File
# Written by xscreensaver-demo 5.38 for marius on Thu Jan 4 11:58:18 2018.
# https://www.jwz.org/xscreensaver/
timeout: 0:05:00
cycle: 0:00:00
lock: True
lockTimeout: 0:05:00
passwdTimeout: 0:00:30
visualID: default
installColormap: True
verbose: False
timestamp: True
splash: True
splashDuration: 0:00:05
demoCommand: xscreensaver-demo
prefsCommand: xscreensaver-demo -prefs
nice: 10
memoryLimit: 0
fade: False
unfade: False
fadeSeconds: 0:00:03
fadeTicks: 20
captureStderr: True
ignoreUninstalledPrograms:False
font: *-medium-r-*-140-*-m-*
dpmsEnabled: True
dpmsQuickOff: True
dpmsStandby: 0:04:00
dpmsSuspend: 0:10:00
dpmsOff: 0:10:00
grabDesktopImages: True
grabVideoFrames: False
chooseRandomImages: True
imageDirectory: /home/marius/Bilder/screensaver_imgs
mode: one
selected: 144
textMode: literal
textLiteral: Owner: Marius Klöck
textFile:
textProgram: echo lol
textURL: https://en.wikipedia.org/w/index.php?title=Special:NewPages&feed=rss
programs: \
maze -root \n\
electricsheep --root 1 \n\
GL: superquadrics -root \n\
attraction -root \n\
blitspin -root \n\
greynetic -root \n\
helix -root \n\
hopalong -root \n\
imsmap -root \n\
- noseguy -root \n\
- pyro -root \n\
qix -root \n\
- rocks -root \n\
rorschach -root \n\
decayscreen -root \n\
flame -root \n\
halo -root \n\
slidescreen -root \n\
pedal -root \n\
bouboule -root \n\
- braid -root \n\
coral -root \n\
deco -root \n\
drift -root \n\
- fadeplot -root \n\
galaxy -root \n\
goop -root \n\
grav -root \n\
ifs -root \n\
GL: jigsaw -root \n\
julia -root \n\
- kaleidescope -root \n\
GL: moebius -root \n\
moire -root \n\
GL: morph3d -root \n\
mountain -root \n\
munch -root \n\
penrose -root \n\
GL: pipes -root \n\
rd-bomb -root \n\
GL: rubik -root \n\
- sierpinski -root \n\
slip -root \n\
GL: sproingies -root \n\
starfish -root \n\
strange -root \n\
swirl -root \n\
triangle -root \n\
xjack -root \n\
xlyap -root \n\
GL: atlantis -root \n\
bsod -root \n\
GL: bubble3d -root \n\
GL: cage -root \n\
- crystal -root \n\
cynosure -root \n\
discrete -root \n\
distort -root \n\
epicycle -root \n\
flow -root \n\
GL: glplanet -root \n\
interference -root \n\
kumppa -root \n\
GL: lament -root \n\
moire2 -root \n\
GL: sonar -root \n\
GL: stairs -root \n\
truchet -root \n\
- vidwhacker -root \n\
blaster -root \n\
bumps -root \n\
ccurve -root \n\
compass -root \n\
deluxe -root \n\
- demon -root \n\
- GL: extrusion -root \n\
- loop -root \n\
penetrate -root \n\
petri -root \n\
phosphor -root \n\
GL: pulsar -root \n\
ripples -root \n\
shadebobs -root \n\
GL: sierpinski3d -root \n\
spotlight -root \n\
squiral -root \n\
wander -root \n\
- webcollage -root \n\
xflame -root \n\
xmatrix -root \n\
GL: gflux -root \n\
- nerverot -root \n\
xrayswarm -root \n\
xspirograph -root \n\
GL: circuit -root \n\
GL: dangerball -root \n\
- GL: dnalogo -root \n\
GL: engine -root \n\
GL: flipscreen3d -root \n\
GL: gltext -root \n\
GL: menger -root \n\
GL: molecule -root \n\
rotzoomer -root \n\
speedmine -root \n\
GL: starwars -root \n\
GL: stonerview -root \n\
vermiculate -root \n\
whirlwindwarp -root \n\
zoom -root \n\
anemone -root \n\
apollonian -root \n\
GL: boxed -root \n\
GL: cubenetic -root \n\
GL: endgame -root \n\
euler2d -root \n\
fluidballs -root \n\
GL: flurry -root \n\
- GL: glblur -root \n\
GL: glsnake -root \n\
halftone -root \n\
GL: juggler3d -root \n\
GL: lavalite -root \n\
- polyominoes -root \n\
GL: queens -root \n\
- GL: sballs -root \n\
GL: spheremonics -root \n\
- thornbird -root \n\
twang -root \n\
- GL: antspotlight -root \n\
apple2 -root \n\
GL: atunnel -root \n\
barcode -root \n\
GL: blinkbox -root \n\
GL: blocktube -root \n\
GL: bouncingcow -root \n\
cloudlife -root \n\
GL: cubestorm -root \n\
eruption -root \n\
GL: flipflop -root \n\
GL: flyingtoasters -root \n\
fontglide -root \n\
GL: gleidescope -root \n\
GL: glknots -root \n\
GL: glmatrix -root \n\
- GL: glslideshow -root -zoom 100 \n\
GL: hypertorus -root \n\
- GL: jigglypuff -root \n\
metaballs -root \n\
GL: mirrorblob -root \n\
piecewise -root \n\
GL: polytopes -root \n\
pong -root \n\
popsquares -root \n\
GL: surfaces -root \n\
xanalogtv -root \n\
abstractile -root \n\
anemotaxis -root \n\
- GL: antinspect -root \n\
fireworkx -root \n\
fuzzyflakes -root \n\
interaggregate -root \n\
intermomentary -root \n\
memscroller -root \n\
GL: noof -root \n\
pacman -root \n\
GL: pinion -root \n\
GL: polyhedra -root \n\
- GL: providence -root \n\
substrate -root \n\
wormhole -root \n\
- GL: antmaze -root \n\
GL: boing -root \n\
boxfit -root \n\
GL: carousel -root \n\
celtic -root \n\
GL: crackberg -root \n\
GL: cube21 -root \n\
fiberlamp -root \n\
GL: fliptext -root \n\
GL: glhanoi -root \n\
GL: tangram -root \n\
GL: timetunnel -root \n\
GL: glschool -root \n\
GL: topblock -root \n\
GL: cubicgrid -root \n\
cwaves -root \n\
GL: gears -root \n\
GL: glcells -root \n\
GL: lockward -root \n\
m6502 -root \n\
GL: moebiusgears -root \n\
GL: voronoi -root \n\
GL: hypnowheel -root \n\
GL: klein -root \n\
- lcdscrub -root \n\
GL: photopile -root \n\
GL: skytentacles -root \n\
GL: rubikblocks -root \n\
GL: companioncube -root \n\
GL: hilbert -root \n\
GL: tronbit -root \n\
GL: geodesic -root \n\
hexadrop -root \n\
GL: kaleidocycle -root \n\
GL: quasicrystal -root \n\
GL: unknownpleasures -root \n\
binaryring -root \n\
GL: cityflow -root \n\
GL: geodesicgears -root \n\
GL: projectiveplane -root \n\
GL: romanboy -root \n\
tessellimage -root \n\
GL: winduprobot -root \n\
GL: splitflap -root \n\
GL: cubestack -root \n\
GL: cubetwist -root \n\
GL: discoball -root \n\
GL: dymaxionmap -root \n\
GL: energystream -root \n\
GL: hexstrut -root \n\
GL: hydrostat -root \n\
GL: raverhoop -root \n\
GL: splodesic -root \n\
GL: unicrud -root \n\
GL: vigilance -root \n\
GL: esper -root \n\
pointerPollTime: 0:00:05
pointerHysteresis: 10
windowCreationTimeout:0:00:30
initialDelay: 0:00:00
GetViewPortIsFullOfLies:False
procInterrupts: True
xinputExtensionDev: False
overlayStderr: True
authWarningSlack: 20

46
.xsession Normal file
View File

@@ -0,0 +1,46 @@
#!/bin/bash
# Fix resolution bug
#xrandr --output eDP1 --mode 1920x1080 --primary
# Load resources
xrdb -merge .Xresources
# Set up an icon tray
trayer --edge top --align right --SetDockType true --SetPartialStrut true --expand true --width 10 --transparent true --alpha 1 --tint 0x000000 --height 19 &
# Start compton
compton --config .compton.conf &
# Set the background color<
xsetroot -solid midnightblue
# Fire up apps
# ~/.xmonad/scripts/wallpaper.sh &
gajim &
thunderbird &
owncloud &
xscreensaver -no-splash &
if [ -x /usr/bin/nm-applet ] ; then
nm-applet --sm-disable &
fi
if [ -x /usr/bin/gnome-power-manager ] ; then
sleep 3
gnome-power-manager &
fi
# exec xmonad