X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/b77536094bb40f40245c30ddff7e65ce0a581d2a..c472ac67a24ba5609b0fcebf893bbdf685b8fd96:/gdk/gdk.lisp

diff --git a/gdk/gdk.lisp b/gdk/gdk.lisp
index 3288559..f3ec462 100644
--- a/gdk/gdk.lisp
+++ b/gdk/gdk.lisp
@@ -20,7 +20,7 @@
 ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
-;; $Id: gdk.lisp,v 1.49 2008-04-11 19:47:39 espen Exp $
+;; $Id: gdk.lisp,v 1.50 2008-04-21 16:21:07 espen Exp $
 
 
 (in-package "GDK")
@@ -305,7 +305,7 @@ (defbinding (events-pending-p "gdk_events_pending") () boolean)
 
 (defbinding event-get () (or null event))
 
-(defbinding event-peek () (pr null event))
+(defbinding event-peek () (or null event))
 
 (defbinding event-get-graphics-expose () event
   (window window))