From 2dc2feacf35cfebade39b2e2797e02ac6d84c4c4 Mon Sep 17 00:00:00 2001
From: Tslil Clingman <hiato1@gmail.com>
Date: Fri, 5 Dec 2014 11:59:55 +0200
Subject: Tweaks and ratpoison window switcher

---
 ratws | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 ratws

(limited to 'ratws')

diff --git a/ratws b/ratws
new file mode 100755
index 0000000..7f55235
--- /dev/null
+++ b/ratws
@@ -0,0 +1,14 @@
+#!/usr/bin/env dash
+
+font="-*-fixed-medium-*-*-*-12-*-*-*-*-*-*-*"
+screen=$(ratpoison -c sdump | tr ',' '\n' | grep '1$')
+width=$(echo $screen | cut -d ' ' -f 4)
+height=$(echo $screen | cut -d ' ' -f 5)
+s=$(echo $screen | cut -d ' ' -f 1)
+w=$(($width/3))
+h=$(($height/3))
+
+alias dm="dmenu -l 16 -s $s -x $w -y $h -w $w -p \"Select >\" -sb '#0B0' -sf black -nb '#000' -fn $font -i"
+
+sel=$(ratpoison -c windows | dm | cut -d ' ' -f 1)
+[ ! "$sel" = "" ] && ratpoison -c "select $sel" || true
-- 
cgit v1.2.3