.gitignore

@@ -83,7 +83,6 @@ dkms.conf
 # Dotenv
 .env
 
-.bash_history
 .bash_aliases/private
 .bashrc.d/private
 desg/

.vim/snips/pandoc.snippets

@@ -57,9 +57,6 @@ def code_inline():
 def code():
 	return code_inline() or code_block()
 
-def slugify(text):
-	return re.sub('\s+', '-', text.lower())
-
 def linkify(text, link):
 	return f"[{text}]({link})"
 
@@ -744,12 +741,6 @@ for i in range(int(match.group(1)), int(match.group(2)) + 1):
 `
 endsnippet
 
-snippet "sec([\sA-z]+)" "Link section titled ..." r
-`!p
-snip.rv = "* " + linkify(match.group(1), f"{snip.basename}_{slugify(match.group(1))}")
-`
-endsnippet
-
 snippet cp(\d+) "Comment current page (and date)" r
 `!p snip.rv = "<!--" + datetime.now().strftime("%Y-%m-%d") + " p. " + match.group(1) + "-->"`
 endsnippet

.xmonad/xmonad.hs

@@ -3,7 +3,6 @@
 import XMonad
 import XMonad.Actions.CopyWindow (copyToAll, killAllOtherCopies)
 import XMonad.Actions.FloatSnap
-import Control.Monad (liftM2)
 import XMonad.Hooks.DynamicProperty
 import XMonad.Hooks.EwmhDesktops
 import XMonad.Hooks.ManageDocks
@@ -61,7 +60,7 @@ pp =
 -- Workspaces & screens {{{
 
 -- Shift to workspace and view workspace
-shiftAndView = doF . liftM2 (.) W.greedyView W.shift
+shiftAndView id = doF (W.view id) <> doF (W.shift id)
 
 -- }}}