stat_media

#!/bin/sh
# A module that queries Quod Libet for the current song and artist
# every INTERVAL seconds.

# interval in seconds
INTERVAL=1
while true; do
  case $(quodlibet --status 2>&1 | head -c4) in
  play)
  quodlibet --print-playing "^fg(#38803A)^p(3)^i(icons/play.xbm)^fg(grey50)^fg(grey85) <title~artist>^fg()" ;;
  paus)
  quodlibet --print-playing "^fg(#803A38)^p(3)^i(icons/pause.xbm)^fg(grey60) <title~artist>^fg()" ;;
  not-)
  echo " ^fg(#803A38)^p(2)^r(9x9)^p(2)^fg(grey60)" ;;
  esac
   sleep $INTERVAL
done