From 8fb5b07384640f7d613c64e4dd25ffa343db96ba Mon Sep 17 00:00:00 2001 From: polos Date: Mon, 27 Mar 2017 18:46:11 +0200 Subject: [PATCH] fix example "screenshot" --- examples/X-extras/screenshot/screenshot.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/examples/X-extras/screenshot/screenshot.lisp b/examples/X-extras/screenshot/screenshot.lisp index 22e6227..7acdbe8 100644 --- a/examples/X-extras/screenshot/screenshot.lisp +++ b/examples/X-extras/screenshot/screenshot.lisp @@ -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)