mirrors/EQL5
1
Fork 0
mirror of https://gitlab.com/eql/EQL5.git synced 2025-12-26 03:42:03 -08:00
Code Issues Projects Releases Packages Wiki Activity

fix example "screenshot"

Browse source
This commit is contained in:
polos 2017-03-27 18:46:11 +02:00
parent 40fb5b6e50
commit 8fb5b07384
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/X-extras/screenshot/screenshot.lisp
View file

@ -16,7 +16,7 @@
(defun countdown (seconds)
(cond ((minusp seconds)
;; screenshot
(|save| (|grab| (|screen| (|desktop.QApplication|)))
(|save| (|grabWindow| (|primaryScreen.QGuiApplication|) 0)
"screenshot.png")
(qquit))
((zerop seconds)