Update of /project/mcclim/cvsroot/mcclim/Backends/beagle In directory clnet:/tmp/cvs-serv30166/Backends/beagle
Modified Files: package.lisp Removed Files: beagle-backend.asd Log Message: Beagle backend fixes * functionality not tested, but it loads under clozure cl snapshot * Patches by Greg Pfeil
Signed-off-by: Rudi Schlatte rudi@constantly.at
--- /project/mcclim/cvsroot/mcclim/Backends/beagle/package.lisp 2006/03/30 12:07:59 1.5 +++ /project/mcclim/cvsroot/mcclim/Backends/beagle/package.lisp 2007/12/18 10:54:21 1.6 @@ -1,6 +1,8 @@ - ;;; -*- Mode: Lisp; Package: COMMON-LISP-USER -*-
+(eval-when (:compile-toplevel :load-toplevel :execute) + (require :cocoa)) + ;;; START - Cribbed from framework/cocoa-support.lisp (in-package "CCL") (defun nslog (c) @@ -24,7 +26,6 @@
#:port-event-process #:port-grafts - #:%set-port-keyboard-focus #:set-sheet-pointer-cursor ;; #:update-mirror-geometry @@ -63,7 +64,6 @@ #:width ;dito #:coordinate= #:get-transformation - #:keyboard-input-focus #:port-grab-pointer #:port-ungrab-pointer ;; @@ -100,4 +100,3 @@ #:with-nsstr) (:export #:beagle-standard-frame-manager #:beagle-aqua-frame-manager)) - \ No newline at end of file