ian/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tmux etc

Browse source
This commit is contained in:
Ian Keane 2020-02-18 14:21:14 -05:00
parent 276853ba84
commit 1cb167b597
361 changed files with 77302 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
sbcl/.quicklisp/dists/quicklisp/software/croatoan-20191227-git/src/kernel.lisp Normal file
View file

@ -0,0 +1,9 @@
(in-package :de.anvi.croatoan)
;; 0 invisible, 1 visible, 2 very visible.
(defun set-cursor-visibility (status)
(case status
((nil :invisible) (%curs-set 0))
((t :visible) (%curs-set 1))
(:very-visible (%curs-set 2))
(otherwise (error "Valid status arguments: nil, t, :very-visible"))))