[mcclim-cvs] CVS update: mcclim/Backends/beagle/beagle-backend.asd

[Duncan Rose]

Update of /project/mcclim/cvsroot/mcclim/Backends/beagle
In directory common-lisp.net:/tmp/cvs-serv15500/beagle

Modified Files:
	beagle-backend.asd 
Log Message:
Add hack to make vertical scroll bars swap sides in scroller-pane
sheets - looks more Cocoa-ey. Should conditionalize this so it's only
used when frame-manager is beagle-aqua-frame-manager.

Date: Mon Jun  6 19:49:21 2005
Author: drose

Index: mcclim/Backends/beagle/beagle-backend.asd
diff -u mcclim/Backends/beagle/beagle-backend.asd:1.4 mcclim/Backends/beagle/beagle-backend.asd:1.5
--- mcclim/Backends/beagle/beagle-backend.asd:1.4	Sun Jun  5 21:52:54 2005
+++ mcclim/Backends/beagle/beagle-backend.asd	Mon Jun  6 19:49:21 2005
@@ -1,6 +1,6 @@
 ;; -*- Mode: Lisp; -*-
 
-;; $Id: beagle-backend.asd,v 1.4 2005/06/05 19:52:54 drose Exp $
+;; $Id: beagle-backend.asd,v 1.5 2005/06/06 17:49:21 drose Exp $
 
 (defpackage "BEAGLE"
   (:use "CLIM" "CLIM-LISP")
@@ -111,7 +111,8 @@
 			      (:module "NativePanes"
 				       :pathname #.(make-pathname :directory '(:relative "native-panes"))
 				       :components
-				       ((:file "beagle-scroll-bar-pane")))
+				       ((:file "beagle-scroll-bar-pane")
+					(:file "scroller-pane-fix")))
 			      (:module "Output"
 				       :depends-on ("Windowing")
 				       :pathname #.(make-pathname :directory '(:relative "output"))