taktoa

import XMonad
import XMonad.Config.Xfce
import XMonad.Hooks.ManageHelpers
import XMonad.Layout.NoBorders
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops
import XMonad.Util.EZConfig

main = xmonad $ ewmh xfceConfig {
        terminal = "xfce4-terminal",

taktoa

#lang racket

(require 
  racket/gui
  sgl)


(define c%
  (class canvas%
    (inherit refresh with-gl-context swap-gl-buffers)