Adding some test

This commit is contained in:
Solene Rapenne 2019-01-15 17:20:42 +01:00
parent 121e59664b
commit a98fb0c772
1 changed files with 8 additions and 0 deletions

8
test/test.lisp Normal file
View File

@ -0,0 +1,8 @@
(setf *tries* 2)
(setf *reminder* 1)
(alert notification "env DISPLAY=:0.0 notify-send -u critical '%state% %function%' '%params% %result%'")
;; check for /tmp/ disk usage
;; create a big file to increase size
(=> notification disk-usage :path "/tmp" :limit 5 :reminder 2)