X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/5c9cc66aa5fa72f1edce094b9c3fe476705de040..1f091d0115dbcf40f1d01b14ffcdd8d76cd92a44:/gtk/gtk.lisp diff --git a/gtk/gtk.lisp b/gtk/gtk.lisp index 722584a..ed3c1ac 100644 --- a/gtk/gtk.lisp +++ b/gtk/gtk.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: gtk.lisp,v 1.46 2005-10-21 12:32:29 espen Exp $ +;; $Id: gtk.lisp,v 1.47 2005-11-15 10:08:13 espen Exp $ (in-package "GTK") @@ -1294,13 +1294,13 @@ (defbinding %window-present () nil (window window)) - (defbinding %window-present-with-timestamp () nil + (defbinding %window-present-with-time () nil (window window) (timespamp unsigned-int)) (defun window-present (window &optional timestamp) (if timestamp - (%window-present-with-timestamp window timestamp) + (%window-present-with-time window timestamp) (%window-present window)))) (defbinding window-iconify () nil