diff --git a/silica/pixmaps.lisp b/silica/pixmaps.lisp index de16930ac2f36051665822a82412ab17571d93ed..076a955345319568414c8b01858a20d866f51c7a 100644 --- a/silica/pixmaps.lisp +++ b/silica/pixmaps.lisp @@ -49,7 +49,7 @@ (defgeneric medium-copy-area (from-medium from-x from-y width height to-medium to-x to-y - &optional function)) + #|&optional function|#)) (defmethod copy-area ((medium basic-medium) from-x from-y width height to-x to-y &optional (function boole-1))