Recently Written · git

stumpwm-init

I use dwm now. Archived.

git clone https://github.com/equwal/stumpwm-init

Log | Files | Refs


util.lisp (274 bytes)

1 (in-package #:stumpwm-init)
2 (defmacro deftermcom (name
3                       &optional argstr (termcom 'xterm))
4   "Call a terminal with arguments."
5   (once-only (argstr)
6     `(defcommand ,name () ()
7        (if ,argstr
8            (,termcom ,argstr)
9            (,termcom)))))