moved to personal fennel config for awesome and added qutebrowser
This commit is contained in:
parent
403cb92b7d
commit
688748f8a6
502 changed files with 8576 additions and 9597 deletions
475
awes2/fnlconfig.fnl
Normal file
475
awes2/fnlconfig.fnl
Normal file
|
|
@ -0,0 +1,475 @@
|
|||
;; Standard awesome library
|
||||
(local gears (require "gears"))
|
||||
(local awful (require "awful"))
|
||||
(require "awful.autofocus")
|
||||
;; Widget and layout library
|
||||
(local wibox (require "wibox"))
|
||||
;; Theme handling library
|
||||
(local beautiful (require "beautiful"))
|
||||
;; Notification library
|
||||
(local naughty (require "naughty"))
|
||||
(local menubar (require "menubar"))
|
||||
;; Enable hotkeys help widget for VIM and other apps
|
||||
;; when client with a matching name is opened:
|
||||
(local hotkeys_popup (require "awful.hotkeys_popup"))
|
||||
(require "awful.hotkeys_popup.keys")
|
||||
|
||||
;; Error handling
|
||||
;; Check if awesome encountered an error during startup and fell back to
|
||||
;; another config (This code will only ever execute for the fallback config)
|
||||
(when awesome.startup_errors
|
||||
(naughty.notify {:preset naughty.config.presets.critical
|
||||
:title "Oops, there were errors during startup!"
|
||||
:text awesome.startup_errors}))
|
||||
|
||||
;; Handle runtime errors after startup
|
||||
(do
|
||||
(var in_error false)
|
||||
(awesome.connect_signal "debug::error" (fn [err]
|
||||
;; Make sure we don't go into an endless error loop
|
||||
(when (not in_error)
|
||||
(set in_error true)
|
||||
(naughty.notify {:preset naughty.config.presets.critical
|
||||
:title "Oops, an error happened!"
|
||||
:text (tostring err)})
|
||||
(set in_error false)))))
|
||||
|
||||
;; Variable definitions
|
||||
;; Themes define colours, icons, font and wallpapers.
|
||||
(beautiful.init (.. (gears.filesystem.get_themes_dir) "default/theme.lua"))
|
||||
|
||||
;; This is used later as the default terminal and editor to run.
|
||||
(var terminal "xterm")
|
||||
(var editor (or (os.getenv "EDITOR") "nano"))
|
||||
(var editor_cmd (.. terminal " -e " editor))
|
||||
|
||||
;; Default modkey.
|
||||
;; Usually, Mod4 is the key with a logo between Control and Alt.
|
||||
;; If you do not like this or do not have such a key,
|
||||
;; I suggest you to remap Mod4 to another key using xmodmap or other tools.
|
||||
;; However, you can use another modifier like Mod1, but it may interact with others.
|
||||
(var modkey "Mod4")
|
||||
|
||||
;; Table of layouts to cover with awful.layout.inc, order matters.
|
||||
(set awful.layout.layouts [
|
||||
awful.layout.suit.floating
|
||||
awful.layout.suit.tile
|
||||
awful.layout.suit.tile.left
|
||||
awful.layout.suit.tile.bottom
|
||||
awful.layout.suit.tile.top
|
||||
awful.layout.suit.fair
|
||||
awful.layout.suit.fair.horizontal
|
||||
awful.layout.suit.spiral
|
||||
awful.layout.suit.spiral.dwindle
|
||||
awful.layout.suit.max
|
||||
awful.layout.suit.max.fullscreen
|
||||
awful.layout.suit.magnifier
|
||||
awful.layout.suit.corner.nw
|
||||
;; awful.layout.suit.corner.ne
|
||||
;; awful.layout.suit.corner.sw
|
||||
;; awful.layout.suit.corner.se
|
||||
])
|
||||
|
||||
;; Menu
|
||||
;; Create a launcher widget and a main menu
|
||||
(global myawesomemenu [
|
||||
[ "hotkeys" (fn [] (hotkeys_popup.show_help nil (awful.screen.focused))) ]
|
||||
[ "manual" (.. terminal " -e man awesome") ]
|
||||
[ "edit config" (.. editor_cmd " " awesome.conffile) ]
|
||||
[ "restart" awesome.restart ]
|
||||
[ "quit" (fn [] (awesome.quit)) ]])
|
||||
|
||||
(global mymainmenu (awful.menu {:items [
|
||||
[ "awesome" myawesomemenu beautiful.awesome_icon ]
|
||||
[ "open terminal" terminal ]]}))
|
||||
|
||||
(global mylauncher (awful.widget.launcher {:image beautiful.awesome_icon
|
||||
:menu mymainmenu }))
|
||||
|
||||
;; Menubar configuration
|
||||
(set menubar.utils.terminal terminal) ;; Set the terminal for applications that require it
|
||||
|
||||
;; Keyboard map indicator and switcher
|
||||
(global mykeyboardlayout (awful.widget.keyboardlayout))
|
||||
|
||||
;; Wibar
|
||||
;; Create a textclock widget
|
||||
(global mytextclock (wibox.widget.textclock))
|
||||
|
||||
;; Create a wibox for each screen and add it
|
||||
(local taglist_buttons
|
||||
(gears.table.join
|
||||
(awful.button [] 1 (fn [t] (: t :view_only)))
|
||||
(awful.button [ modkey ] 1 (fn [t] (when client.focus (: client.focus :move_to_tag t))))
|
||||
(awful.button [] 3 awful.tag.viewtoggle)
|
||||
(awful.button [ modkey ] 3 (fn [t] (when client.focus (: client.focus :toggle_tag t))))
|
||||
(awful.button [] 4 (fn [t] (awful.tag.viewnext t.screen)))
|
||||
(awful.button [] 5 (fn [t] (awful.tag.viewprev t.screen)))))
|
||||
|
||||
(local tasklist_buttons
|
||||
(gears.table.join
|
||||
(awful.button [] 1 (fn [c]
|
||||
(if (= c client.focus)
|
||||
(set c.minimized true)
|
||||
(: c :emit_signal
|
||||
"request::activate"
|
||||
"tasklist"
|
||||
{:raise true}
|
||||
))))
|
||||
(awful.button [] 3 (fn [] (awful.menu.client_list {:theme {:width 250 }})))
|
||||
(awful.button [] 4 (fn [] (awful.client.focus.byidx 1)))
|
||||
(awful.button [] 5 (fn [] (awful.client.focus.byidx -1)))))
|
||||
|
||||
(fn set_wallpaper [s]
|
||||
;; Wallpaper
|
||||
(when beautiful.wallpaper
|
||||
(var wallpaper beautiful.wallpaper)
|
||||
;; If wallpaper is a function, call it with the screen
|
||||
(when (= (type wallpaper) "function")
|
||||
(set wallpaper (wallpaper s)))
|
||||
(gears.wallpaper.maximized wallpaper s true)))
|
||||
|
||||
;; Re-set wallpaper when a screen's geometry changes (e.g. different resolution)
|
||||
(screen.connect_signal "property::geometry" set_wallpaper)
|
||||
|
||||
(awful.screen.connect_for_each_screen
|
||||
(fn [s]
|
||||
;; Wallpaper
|
||||
(set_wallpaper s)
|
||||
|
||||
;; Each screen has its own tag table.
|
||||
(awful.tag [ "1" "2" "3" "4" "5" "6" "7" "8" "9" ] s (. awful.layout.layouts 1))
|
||||
|
||||
;; Create a promptbox for each screen
|
||||
(set s.mypromptbox (awful.widget.prompt))
|
||||
;; Create an imagebox widget which will contain an icon indicating which layout we're using.
|
||||
;; We need one layoutbox per screen.
|
||||
(set s.mylayoutbox (awful.widget.layoutbox s))
|
||||
(: s.mylayoutbox :buttons (gears.table.join
|
||||
(awful.button [] 1 (fn [] (awful.layout.inc 1 s awful.layout.layouts)))
|
||||
(awful.button [] 3 (fn [] (awful.layout.inc -1 s)))
|
||||
(awful.button [] 4 (fn [] (awful.layout.inc 1 s)))
|
||||
(awful.button [] 5 (fn [] (awful.layout.inc -1 s)))))
|
||||
;; Create a taglist widget
|
||||
(set s.mytaglist (awful.widget.taglist {
|
||||
:screen s
|
||||
:filter awful.widget.taglist.filter.all
|
||||
:buttons taglist_buttons
|
||||
}))
|
||||
|
||||
;; Create a tasklist widget
|
||||
(set s.mytasklist (awful.widget.tasklist {
|
||||
:screen s
|
||||
:filter awful.widget.tasklist.filter.currenttags
|
||||
:buttons tasklist_buttons
|
||||
}))
|
||||
|
||||
;; Create the wibox
|
||||
(set s.mywibox (awful.wibar { :position "top" :screen s }))
|
||||
|
||||
;; Add widgets to the wibox
|
||||
(: s.mywibox :setup {
|
||||
:layout wibox.layout.align.horizontal
|
||||
1 { ;; Left widgets
|
||||
:layout wibox.layout.fixed.horizontal
|
||||
1 mylauncher
|
||||
2 s.mytaglist
|
||||
3 s.mypromptbox
|
||||
}
|
||||
2 s.mytasklist ;; Middle widget
|
||||
3 { ;; Right widgets
|
||||
:layout wibox.layout.fixed.horizontal
|
||||
1 mykeyboardlayout
|
||||
2 (wibox.widget.systray)
|
||||
3 mytextclock
|
||||
4 s.mylayoutbox
|
||||
}
|
||||
})))
|
||||
|
||||
|
||||
;; Mouse bindings
|
||||
(root.buttons (gears.table.join
|
||||
(awful.button [ ] 3 (fn [] (: mymainmenu :toggle)))
|
||||
(awful.button [ ] 4 awful.tag.viewnext)
|
||||
(awful.button [ ] 5 awful.tag.viewprev)))
|
||||
|
||||
;; key bindings
|
||||
(global globalkeys
|
||||
(gears.table.join
|
||||
(awful.key [ modkey ] "s" hotkeys_popup.show_help
|
||||
{ :description "show help" :group "awesome"})
|
||||
(awful.key [ modkey ] "Left" awful.tag.viewprev
|
||||
{:description "view previous" :group "tag"})
|
||||
(awful.key [ modkey ] "Right" awful.tag.viewnext
|
||||
{:description "view next" :group "tag"})
|
||||
(awful.key [ modkey ] "Escape" awful.tag.history.restore
|
||||
{:description "go back" :group "tag"})
|
||||
(awful.key [ modkey ] "j" (fn [] (awful.client.focus.byidx 1))
|
||||
{:description "focus next by index" :group "client"})
|
||||
(awful.key [ modkey ] "k" (fn [] (awful.client.focus.byidx -1))
|
||||
{:description "focus previous by index" :group "client"})
|
||||
(awful.key [ modkey ] "w" (fn [] (: mymainmenu :show))
|
||||
{:description "show main menu" :group "awesome"})
|
||||
|
||||
;; Layout manipulation
|
||||
(awful.key [ modkey "Shift" ] "j" (fn [] (awful.client.swap.byidx 1))
|
||||
{:description "swap with next client by index" :group "client"})
|
||||
(awful.key [ modkey "Shift" ], "k" (fn [] (awful.client.swap.byidx -1))
|
||||
{:description "swap with previous client by index" :group "client"})
|
||||
(awful.key [ modkey "Control" ] "j" (fn [] (awful.screen.focus_relative 1))
|
||||
{:description "focus the next screen" :group "screen"})
|
||||
(awful.key [ modkey "Control" ] "k" (fn [] (awful.screen.focus_relative -1))
|
||||
{:description "focus the previous screen" :group "screen"})
|
||||
(awful.key [ modkey ] "u" awful.client.urgent.jumpto
|
||||
{:description "jump to urgent client" :group "client"})
|
||||
(awful.key [ modkey ] "Tab" (fn []
|
||||
(awful.client.focus.history.previous)
|
||||
(when client.focus (: client.focus :raise)))
|
||||
{:description "go back" :group "client"})
|
||||
|
||||
;; Standard program
|
||||
(awful.key [ modkey ] "Return" (fn [] (awful.spawn terminal))
|
||||
{:description "open a terminal" :group "launcher"})
|
||||
(awful.key [ modkey "Control" ] "r" awesome.restart
|
||||
{:description "reload awesome" :group "awesome"})
|
||||
(awful.key [ modkey "Shift" ] "q" awesome.quit
|
||||
{:description "quit awesome" :group "awesome"})
|
||||
(awful.key [ modkey ] "l" (fn [] (awful.tag.incmwfact 0.05))
|
||||
{:description "increase master width factor" :group "layout"})
|
||||
(awful.key [ modkey ] "h" (fn [] (awful.tag.incmwfact -0.05))
|
||||
{:description "decrease master width factor" :group "layout"})
|
||||
(awful.key [ modkey "Shift" ] "h" (fn [] (awful.tag.incnmaster 1 nil true))
|
||||
{:description "increase the number of master clients" :group "layout"})
|
||||
(awful.key [ modkey "Shift" ] "l" (fn [] (awful.tag.incnmaster -1 nil true))
|
||||
{:description "decrease the number of master clients" :group "layout"})
|
||||
(awful.key [ modkey "Control" ] "h" (fn [] (awful.tag.incncol 1 nil true))
|
||||
{:description "increase the number of columns" :group "layout"})
|
||||
(awful.key [ modkey "Control" ] "l" (fn [] (awful.tag.incncol -1 nil true))
|
||||
{:description "decrease the number of columns" :group "layout"})
|
||||
(awful.key [ modkey ] "space" (fn [] (awful.layout.inc 1))
|
||||
{:description "select next" :group "layout"})
|
||||
(awful.key [ modkey "Shift" ] "space" (fn [] (awful.layout.inc -1))
|
||||
{:description "select previous" :group "layout"})
|
||||
(awful.key [ modkey "Control" ] "n" (fn []
|
||||
(local c (awful.client.restore))
|
||||
(when c ;; Focus restored client
|
||||
(: c :emit_signal "request::activate" "key.unminimize" {:raise true})))
|
||||
{:description "restore minimized" :group "client"})
|
||||
|
||||
;; Prompt
|
||||
(awful.key [ modkey ] "r" (fn [] (: (. (awful.screen.focused) :mypromptbox) :run))
|
||||
{:description "run prompt" :group "launcher"})
|
||||
|
||||
(awful.key [ modkey ] "x" (fn []
|
||||
(let [fscr (awful.screen.focused)]
|
||||
(awful.prompt.run {
|
||||
:prompt "Run Lua code: "
|
||||
:textbox fscr.mypromptbox.widget
|
||||
:exe_callback awful.util.eval
|
||||
:history_path (.. (awful.util.get_cache_dir) "/history_eval")
|
||||
})))
|
||||
{:description "lua execute prompt" :group "awesome"})
|
||||
;; Menubar
|
||||
(awful.key [ modkey ] "p" (fn [] (menubar.show))
|
||||
{:description "show the menubar" :group "launcher"})))
|
||||
|
||||
(global clientkeys
|
||||
(gears.table.join
|
||||
(awful.key [ modkey ] "f" (fn [c] (set c.fullscreen (not c.fullscreen)) (: c :raise))
|
||||
{:description "toggle fullscreen" :group "client"})
|
||||
(awful.key [ modkey "Shift" ] "c" (fn [c] (: c :kill))
|
||||
{:description "close" :group "client"})
|
||||
(awful.key [ modkey "Control" ] "space" awful.client.floating.toggle
|
||||
{:description "toggle floating" :group "client"})
|
||||
(awful.key [ modkey "Control" ] "Return" (fn [c] (: c :swap (awful.client.getmaster)))
|
||||
{:description "move to master" :group "client"})
|
||||
(awful.key [ modkey ] "o" (fn [c] (: c :move_to_screen))
|
||||
{:description "move to screen" :group "client"})
|
||||
(awful.key [ modkey ] "t"(fn [c] (set c.ontop (not c.ontop)))
|
||||
{:description "toggle keep on top" :group "client"})
|
||||
(awful.key [ modkey ] "n" (fn [c]
|
||||
;; The client currently has the input focus, so it cannot be
|
||||
;; minimized, since minimized clients can't have the focus.
|
||||
(set c.minimized true))
|
||||
{:description "minimize" :group "client"}),
|
||||
(awful.key [ modkey ] "m" (fn [c] (set c.maximized (not c.maximized)) (: c :raise))
|
||||
{:description "(un)maximize" :group "client"}),
|
||||
(awful.key [ modkey "Control" ] "m" (fn [c] (set c.maximized_vertical (not c.maximized_vertical)) (: c :raise))
|
||||
{:description "(un)maximize vertically" :group "client"}),
|
||||
(awful.key [modkey "Shift" ] "m" (fn [c] (set c.maximized_horizontal (not c.maximized_horizontal)) (: c :raise))
|
||||
{:description "(un)maximize horizontally" :group "client"})))
|
||||
|
||||
;; Bind all key numbers to tags.
|
||||
;; Be careful: we use keycodes to make it work on any keyboard layout.
|
||||
;; This should map on the top row of your keyboard, usually 1 to 9.
|
||||
(for [i 1 9]
|
||||
(global globalkeys
|
||||
(gears.table.join
|
||||
globalkeys
|
||||
;; View tag only.
|
||||
(awful.key [ modkey ] (.. "#" (+ i 9))
|
||||
(fn []
|
||||
(let [screen (awful.screen.focused)
|
||||
tag (. screen.tags i)]
|
||||
(when tag
|
||||
(: tag :view_only))))
|
||||
{:description (.. "view tag #" i) :group "tag"})
|
||||
;; Toggle tag display
|
||||
(awful.key [ modkey "Control" ] (.. "#" (+ i 9))
|
||||
(fn []
|
||||
(let [screen (awful.screen.focused)
|
||||
tag (. screen.tags i)]
|
||||
(when tag
|
||||
(awful.tag.viewtoggle))))
|
||||
{:description (.. "toggle tag #" i) :group "tag"})
|
||||
;; Move client to tag
|
||||
(awful.key [ modkey, "Shift" ] (.. "#" (+ i 9))
|
||||
(fn []
|
||||
(when client.focus
|
||||
(let [tag (. client.focus.screen.tags i)]
|
||||
(when tag
|
||||
(: client.focus :move_to_tag tag)))))
|
||||
{:description (.. "move focused client to tag #" i) :group "tag"})
|
||||
;; Toggle tag on focused client.
|
||||
(awful.key [ modkey "Control" "Shift" ] (.. "#" (+ i 9))
|
||||
(fn []
|
||||
(when client.focus
|
||||
(let [tag (. client.focus.screen.tags i)]
|
||||
(when tag
|
||||
(: client.focus :toggle_tag tag)))))
|
||||
{:description (.. "toggle focused client on tag #" i) :group "tag"}))))
|
||||
|
||||
(global clientbuttons
|
||||
(gears.table.join
|
||||
(awful.button [] 1 (fn [c] (: c :emit_signal "request::activate" "mouse_click" {:raise true})))
|
||||
(awful.button [ modkey ] 1 (fn [c]
|
||||
(: c :emit_signal "request::activate" "mouse_click" {:raise true})
|
||||
(awful.mouse.client.move c)))
|
||||
(awful.button [ modkey ] 3 (fn [c]
|
||||
(: c :emit_signal "request::activate" "mouse_click" {:raise true})
|
||||
(awful.mouse.client.resize c)))))
|
||||
;; Set keys
|
||||
(root.keys globalkeys)
|
||||
|
||||
;; Rules
|
||||
;; Rules to apply to new clients (through the "manage" signal)
|
||||
(set awful.rules.rules
|
||||
[
|
||||
;; All clients will match this rule.
|
||||
{
|
||||
:rule { }
|
||||
:properties { :border_width beautiful.border_width
|
||||
:border_color beautiful.border_normal
|
||||
:focus awful.client.focus.filter
|
||||
:raise true
|
||||
:keys clientkeys
|
||||
:buttons clientbuttons
|
||||
:screen awful.screen.preferred
|
||||
:placement (+ awful.placement.no_overlap awful.placement.no_offscreen)
|
||||
}
|
||||
}
|
||||
|
||||
;; Floating clients.
|
||||
{
|
||||
:rule_any {
|
||||
:instance [
|
||||
"DTA" ;; Firefox addon DownThemAll.
|
||||
"copyq" ;; Includes session name in class.
|
||||
"pinentry"
|
||||
]
|
||||
:class [
|
||||
"Arandr"
|
||||
"Blueman-manager"
|
||||
"Gpick"
|
||||
"Kruler"
|
||||
"MessageWin" ;; kalarm.
|
||||
"Sxiv"
|
||||
"Tor Browser" ;; Needs a fixed window size to avoid fingerprinting by screen size.
|
||||
"Wpa_gui"
|
||||
"veromix"
|
||||
"xtightvncviewer"
|
||||
]
|
||||
;; Note that the name property shown in xprop might be set slightly after creation of the client
|
||||
;; and the name shown there might not match defined rules here.
|
||||
:name [
|
||||
"Event Tester" ;; xev
|
||||
]
|
||||
:role [
|
||||
"AlarmWindow" ;; Thunderbird's calendar.
|
||||
"ConfigManager" ;; Thunderbird's about:config.
|
||||
"pop-up" ;; e.g. Google Chrome's (detached) Developer Tools.
|
||||
]
|
||||
}
|
||||
:properties {:floating true }}
|
||||
|
||||
;; Add titlebars to normal clients and dialogs
|
||||
{
|
||||
:rule_any {:type [ "normal", "dialog" ] }
|
||||
:properties {:titlebars_enabled false }
|
||||
}
|
||||
|
||||
;; Set Firefox to always map on the tag named "2" on screen 1.
|
||||
;; { :rule { :class "Firefox" }
|
||||
;; :properties { :screen 1 :tag "2" } }
|
||||
])
|
||||
|
||||
;; Signals
|
||||
;; Signal function to execute when a new client appears.
|
||||
(client.connect_signal
|
||||
"manage"
|
||||
(fn [c]
|
||||
;; Set the windows at the slave,
|
||||
;; i.e. put it at the end of others instead of setting it master.
|
||||
;; (when (not awesome.startup) (awful.client.setslave c))
|
||||
|
||||
(when (and awesome.startup
|
||||
(not c.size_hints.user_position)
|
||||
(not c.size_hints.program_position))
|
||||
;; Prevent clients from being unreachable after screen count changes.
|
||||
(awful.placement.no_offscreen c))))
|
||||
|
||||
;; Add a titlebar if titlebars_enabled is set to true in the rules.
|
||||
(client.connect_signal
|
||||
"request::titlebars"
|
||||
(fn [c]
|
||||
;; buttons for the titlebar
|
||||
(let [buttons (gears.table.join
|
||||
(awful.button [] 1 (fn []
|
||||
(: c :emit_signal "request::activate" "titlebar" {:raise true})
|
||||
(awful.mouse.client.move c)))
|
||||
(awful.button [] 3 (fn []
|
||||
(: c :emit_signal "request::activate" "titlebar" {:raise true})
|
||||
(awful.mouse.client.resize c))))
|
||||
titlebar (awful.titlebar c)]
|
||||
(: titlebar :setup {
|
||||
1 { ;; Left
|
||||
1 (awful.titlebar.widget.iconwidget c)
|
||||
:buttons buttons
|
||||
:layout wibox.layout.fixed.horizontal
|
||||
}
|
||||
2 { ;; Middle
|
||||
1 { ;; Title
|
||||
:align "center"
|
||||
:widget (awful.titlebar.widget.titlewidget c)
|
||||
}
|
||||
:buttons buttons
|
||||
:layout wibox.layout.flex.horizontal
|
||||
}
|
||||
3 { ;; Right
|
||||
1 (awful.titlebar.widget.floatingbutton c)
|
||||
2 (awful.titlebar.widget.maximizedbutton c)
|
||||
3 (awful.titlebar.widget.stickybutton c)
|
||||
4 (awful.titlebar.widget.ontopbutton c)
|
||||
5 (awful.titlebar.widget.closebutton c)
|
||||
:layout (wibox.layout.fixed.horizontal)
|
||||
}
|
||||
:layout wibox.layout.align.horizontal
|
||||
}))))
|
||||
|
||||
;; Enable sloppy focus, so that focus follows mouse.
|
||||
(client.connect_signal "mouse::enter"
|
||||
(fn [c]
|
||||
(: c :emit_signal "request::activate" "mouse_enter" {:raise false})))
|
||||
|
||||
(client.connect_signal "focus" (fn [c] (set c.border_color beautiful.border_focus)))
|
||||
(client.connect_signal "unfocus" (fn [c] (set c.border_color beautiful.border_normal)))
|
||||
Loading…
Add table
Add a link
Reference in a new issue