stumpwm/clipboard.lisp @ c0d31d738157 default tip

More
author Steve Losh <steve@stevelosh.com>
date Mon, 02 Mar 2026 13:12:13 -0500
parents 46c8ae0df6cc
children (none)
(in-package :stumpwm-user)

(defcommand generate-random-uuid () ()
  (pbcopy (string-downcase (princ-to-string (uuid:make-v4-uuid))))
  (message "Copied random UUID to clipboard."))

(defcommand bee-movie-script () ()
  (run-shell-command "pbeecopy")
  (message "Copied the entire Bee Movie script to clipboard."))

(defcommand dump-clipboard () ()
  (echo (run-shell-command "pbpaste" t)))

#; Scratch --------------------------------------------------------------------